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

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

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

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