Question

Помоги пожалуйста ещё завтра отчёт надо сдать по программированию вот задание. Написать программу,проверяющую принадлежность точки с координатами (x,y) заштрихованной области на плоскости

Answer 1

Вроде бы так
uses crt;
var x,y:real;
begin
write('Введите координаты x и y точки: ');
read(x,y);
if (abs(x)>=0.5) and (abs(y)>=0.5) and (abs(x)<=1) and (abs(y)<=1) then
writeln('Принадлежит.')else writeln('Не принадлежит.');
end.