Определить, какой четверти координатной плоскости, оси Х, оси У или началам координат принадлежит точка с координатами, заданными случайным образом. Pascal ABC

Question

Информатика

Донара

20 декабря, 16:57

Определить, какой четверти координатной плоскости, оси Х, оси У или началам координат принадлежит точка с координатами, заданными случайным образом. Pascal ABC

+3

Ответы (1)

Знаете ответ на вопрос?

Уля · Answer 1

Var

x, y:integer;

begin

readln (x) ;

readln (y) ;

if (x>0) and (y>0) then writeln ('1') ;

if (x<0) and (y<0) then writeln ('3') ;

if (x0) then writeln ('2') ;

if (x>0) and (y<0) then writeln ('4') ;

end.