Question

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

Answer 1

var x, y : integer;
begin
   write('x = '); readln(x);
   write('y = '); readln(y);
   if (x = 0) and (y = 0) then writeln(1)
   else if (x = 0) then writeln(2)
   else if (y = 0) then writeln(3)
   else writeln(0)
end.