Составить программу, определяющую принадлежность точки с координатами x, y заштрихованной области:
VAR
X,Y:REAL;
BEGIN
READLN(X,Y);
IF (Y<=-X+6)AND(Y>=-2*X+4)AND(Y>=0)AND(X>=0)THEN
WRITELN(ПРИНАДЛЕЖИТ)
ELSE
WRITELN(НЕ ПРИНАДЛЕЖИТ)
END.
Оцени ответ
