Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Составить программу которая вводит с клавиатуры координаты точек на плоскости и определяет принадлежность точки зашрихованной области включая её границы

Ответ оставил Гость

Условия y≤-x при x≤0  и y≤x при x>0 можно объединить в одно: y≤|x|

var
  x, y: real;

begin
  Write(Введите координаты точки на плоскости: );Readln(x, y);
  if (y <= abs(x)) and (y >= sqr(x) - 3) then
    Writeln(Точка принадлежит заштрихованной области)
  else
    Writeln(Точка не принадлежит заштрихованной области)
end.

Тестовое решение:
Введите координаты точки на плоскости: -1.15 -1.24
Точка принадлежит заштрихованной области