Даны вещественные числа x и y.Определить принадлежит ли точка с координатами (x,y)...

Question

Даны вещественные числа x и y.Определить принадлежит ли точка с координатами (x,y) заштрихованной области.

---

Answer 1

Var x,y:real;
begin
readln(x,y);
if (abs(x)<=1)and(y<=1)and((y>=-x)or(y>=x))
 then writeln('Yes') else writeln('No');
end.

Пример:
0.5 -0.4
Yes