Написать программу на языке Паскаль
Точка М(х, у) принадлежит
прямоугольнику, ограниченному прямыми х=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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.