Как обозначить точку

[WitaliG]

Даны целочисленные координаты точки на плоскости. Если точка совпа¬дает с началом координат, то вывести 0. Если точка не совпадает с нача¬лом координат, но лежит на оси OX или OY, то вывести соответственно 1 или 2. Если точка не лежит на координатных осях, то вывести 3.

var
x,y :integer;
begin
readln(x,y);
if (x=0) and (y=0) then
writeln(0);
if …….

Вопрос: Как мне правильно написать, что точка лежит от 0 до +∞
Буду очень благодарен.
С уважением Виталий.

[xDyPx]

X>=0

Это и будет как раз [0,+∞)

[WitaliG]

Спасибо.
С уважением Виталий.