20 балов .Очень нужнооо!Задачи на определение принадлежности точки области

Для каждой задачи составить программу, содержащую ветвления и определяющую, принадлежит ли точка с координатами (X, Y) заштрихованной области.

Спасибо ) Большое !

Пожалуйста

Если надо включить границы областей, везде неравенства сделать нестрогими, добавив знак =

Т.е. писать >= или <=

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018Внимание! Если программа не работает, обновите версию!begin var (x,y):=ReadReal2; var p:=(x>-4) and (x<5) and (y>-3) and (y<0) or    (y>0) and (y<4) and (Abs(x)<2); if p then Writeln('Принадлежит') else Writeln('Не принадлежит')end.