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

var x, y: real;const centerX = 4; centerY = 4; distance = 3;begin    writeln('Введите координаты точки x, y: ');    read(x);    read(y);    writeln(abs(centerX - x) + abs(centerY - y) <= distance)end.