Ответы
Ответ дал:
0
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadReal2('Введите координаты точки х у:');
if (x<0) and (y<0) then Writeln('Точка принадлежит III четверти')
else Writeln('Точка не принадлежит III четверти')
end.
Пример
Введите координаты точки х у: -3.16 5
Точка не принадлежит III четверти
Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadReal2('Введите координаты точки х у:');
if (x<0) and (y<0) then Writeln('Точка принадлежит III четверти')
else Writeln('Точка не принадлежит III четверти')
end.
Пример
Введите координаты точки х у: -3.16 5
Точка не принадлежит III четверти
Вас заинтересует
2 года назад
2 года назад
3 года назад
9 лет назад
9 лет назад
10 лет назад