Написать программу, которая по вводимым координатам точки(х,у) определяет, принадлежит ли...

Question

Написать программу, которая по вводимым координатам точки(х,у) определяет, принадлежит ли точка области:

---

Comments

Если точка прям на границе лежит, будем считать, что она принадлежит области?

Answer 1

Var  x,y: real;
begin
write('Введите координаты точки х и у:');
readln(x,y);
if abs(y)<=1 then<br>  if (1<=x) and (x<=5) then<br>    writeln('Да, принадлежит')
      else writeln('Нет, не принадлежит')
end.