If21. Даны целочисленные координаты точки на плоскости. Если точка совпадает с началом координат, то вывести 0. Если точка не совпадает с началом координат, но лежит на оси $$OX$$ или $$OY$$, то вывести соответственно 1 или 2. Если точка не лежит на координатных осях, то вывести 3.
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
program if21; var X,Y: Real; begin Writeln('Введите координаты точки: '); Write('Введите координату X: '); Readln (X); Write('Введите координату Y: '); Readln (Y); if (X=0) and (Y=0) then Writeln('0'); if (X=0) and (Y<>0) then Writeln('1'); if (X<>0) and (Y=0) then Writeln('2'); if (X<>0) and (Y<>0) then Writeln('3'); end. |
Другие задачи из раздела If можно посмотреть здесь.
Комментарии: