Проверить истинность высказывания: «Точка с координатами (x, y) лежит во второй или третьей координатной четверти»

Даны числа x, y.

Program Boolean27;
Var
x,y:Real;
Begin
ReadLn(x,y);
WriteLn(((x <= 0) And (y >= 0)) Or ((x <= 0) And (y <= 0)));
end.

автор: Sklyarov Sergej a.k.a. S9