Принадлежит ли точка выделенной области графика

Задача №1 :

Точка задана своими координатами (x, y). Написать программу, которая используя логическое выражение выводит TRUE, если точка принадлежит заштрихованной области и FALSE - если не принадлежит.

Решение задачи

Program  logistika;
Var b:boolean;
    x,y:real;
Begin
     write('Введите x ');
     readln(x);
     write('Введите y ');
     readln(y);
     b:=( y>=-x-1 ) and ( y>=x-1 ) and ( y<=x+1 ) and (y<=1-x );
     writeln(b);
     Readln;
End.