profile
Опубликовано 4 года назад по предмету Информатика от GulnurKa66

Задача pascal 
Даны целочисленные координаты точки на плоскости. 
Если точка совпадает с началом координат, то вывести 0. 
Если точка не совпадает с началом координат, но лежит на оси ОХ или OY, 
то вывести соответственно 1 или 2. 
Если точка не лежит на координатных осях, вывести 3. (нужно чтобы прошла тест на taskbook)

  1. Ответ
    Ответ дан HRAshton
    var x, y: integer;
    begin
         readln(x , y);
         write('> ');
         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.

    Проверку на Pascal ABC проходит, а тот сайт не грузится у меня, инет плохой..)
Самые новые вопросы