Выяснить, принадлежность точки к закрашенной области - PascalABC.NET

Формулировка задачи:

Будьте добры! Помогите написать программу, которая будет выводить, принадлежит ли точка к закрашенной области или нет. Я знаю, что надо думать самой, но у меня не получается сделать ИМЕННО эту программу. До нее все сделала. Буду очень признательна. Программу нужно составить в PascalABC.Net

Решение задачи: «Выяснить, принадлежность точки к закрашенной области»

Листинг программы

readln(x,y);
if y<=x then write('принадлежит')
else write('не принадлежит');

Объяснение кода листинга программы

Ввод координат точки (x,y) с помощью функции readln()
Оценка принадлежности точки к закрашенной области по условию y<=x
Вывод сообщения принадлежит или не принадлежит с помощью функции write()