Pascal:составить программу которая вводит координаты точки x,y и определяет попадает ли...
Pascal:составить программу которая вводит координаты точки x,y и определяет попадает ли точка в заштрихованную область в рисунке, попадание на границу области считается попаданием области
нужно указывать куда попадает точка в круг или в треугольник или просто попадает или нет?

Предыдущий
вопрос Следующий
вопрос

Вот пример программы на Pascal, которая определяет, попадает ли точка в заданную область:

program CheckPoint;
var
x, y: real;
begin
writeln('Введите координату x:');
readln(x);
writeln('Введите координату y:');
readln(y);
if ((x >= -1) and (x <= 1) and (y >= 0) and (y <= 1) and (y <= 2*x+2)) or
((x >= -1) and (x <= 1) and (y < 0) and (y >= -1)) or
((x < -1) and (x >= -2) and (y >= 0) and (y <= 2*x+2)) then
writeln('Точка находится в заштрихованной области')
else
writeln('Точка не попадает в заштрихованную область');
end.

В этой программе вам нужно ввести координаты точки x и y, и она определит, попадает ли точка в заштрихованную область на рисунке.