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

Question

Построить программу, которая вводит координаты точки (x,y) и определяет, попадает ли точка в заштрихованную область на рисунке.ПОМОГИТЕ РЕШИТЬ, ОЧЕНЬ НАДО!!!​

---

Answer 1

var

x, y: real;

begin

write ('x='); readln(x);

write ('y='); readln(y);

if (sqr(x)+sqr(y)<=1) and (x*y<=0) then</p>

writeln ('точка принадлежит данной области')

else

writeln ('точка не принадлежит данной области');

end.