Ошибка в задании a+b два раза.

Поэтому второй раз написал a-b

program formula4;

var x,a:real;

begin

read(x,a);

if (x <10)and(a>5) then

write(x+a)

else

write(x-a)

end.