Ввести координаты и определить, попадают ли они в закрашенную область

Question

Ввести координаты и определить, попадают ли они в закрашенную область

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var x, y: integer; begin readln(x, y); if (x > 0) and (y>=0) and (y<=x) or (x<=0) and (y>0) and (y< -x) then writeln('Принадлежит') else writeln('Не принадлежит'); end.