Question

50 баллов срочно!! определить принадлежит ли точка фигуре pascal

Answer 1

Var x,y: real;
Begin
readln (x,y);
if (y>=-x+5)and(y>=x-3)and(y<=-x+11)and(y<=x+3)
 then writeln('YES')
 else writeln('NO')
End.

Пример:
2 2
NO