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

Question

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

Answer 1

59

sima007

13 апреля 2023

Var x,y: real; begin write ('X='); readln (x); write ('Y='); readln (y); if (x>0) and (y>0) then writeln (1) else if (x<0) and (y>0) then writeln (2) else if (x<0) and (y<0) then writeln (3) else if (x>0) and (y<0) then writeln (4); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: