Написать программу на языке ПаскальТочка М(х, у) принадлежит прямоугольнику, ограниченному прямыми х=2,у=1 и координатными осями.
Написать программу на языке Паскаль
Точка М(х, у) принадлежит
прямоугольнику, ограниченному прямыми х=2,
у=1 и координатными осями.
Ответ(ы) на вопрос:
var
x, y: real;
isin: string;
begin
readln(x, y);
if ((x < 0) or (x > 2) or (y < 0) or (y > 2)) then
isin := 'не ';
writeln('M(', x, '; ', y, ') ', isin, 'принадлежит прямоугольнику');
end.
Не нашли ответ?
Похожие вопросы