составить линейную программу, которая печатает true, если точка
с координатами (х, у) принадлежит закрашенной области, и false — в
противном случае:

спасибо)

Пожалуйста. Спасибо тут принято отражать кнопкой, а звездочками - размеры "спасибо". Если Вы будете этим пренебрегать, через какое-то время люди перестанут решать Вам задачи)))

var  x, y: real;begin  Write('Введите через пробел координаты точки (x,y): ');  Readln(x, y);  Write((y >= 0) and (y <= 4 - abs(x)))end.Тестовое решение:Введите через пробел координаты точки (x,y): 1 3.1FalseВведите через пробел координаты точки (x,y): -1 2.9True