PascalДаны координаты точки, не лежащей на координатных осях OX и OY.

Pascal

Даны координаты точки, не лежащей на координатных осях OX и OY. Найти номер координатной четверти, в которой находится данная точка.

Задать свой вопрос
1 ответ
Var X,Y:real;
Begin
Write('X = ');
ReadLn(X);
Write('Y = ');
ReadLn(Y);
if Xgt;0 then
   if Ygt;0 then Write('Первая четверть')
   else Write('2-ая четверть')
else
   if Ylt;0 then Write('Третья четверть')
   else Write('Четвёртая четверть')
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт