Question

"Справедливы неравенства А>0 или В< -2 ".Проверить истинность высказывания.

Answer 1

var

a,b:real;

begin

readln(a,b);

if (a>0) or (b<-2) then

writeln('истинно')

else

writeln('ложно');

end.