Составьте программу, определяющую номер координатной четверти, в которой находится точка с координатами(x,y). Числа x,y введите с клавиатуры.

Пример ввода: -5 7
Пример вывода: 2
Pascal

спасиб оограменное

спасибо огроменное*

не за что; будут еще по программированию в паскаль,обращайся

ок

program z1;var x,y:integer;beginwriteln('введите координаты');readln(x,y);if (x>0) and (y>0) then writeln('1')elseif (x>0) and (y<0) then writeln('4')elseif (x<0) and (y>0) then writeln('2')else writeln('3');end.