Question

Инфа 10-11, нужна помощь

Answer 1

Program test3;

Var x,y : real;

Begin

Readln (x,y);

if((sqr(x)+sqr(y)>4) and (x>y)and(x<2))

then

Write('true')

else

Write('false')

End.