Question

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

Answer 1

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.