Question

Составить программу, по которой выведется значение true, если точка с заданными координатами (x,y) лежит внутри заштрихованной области и false – в противном случае.

Answer 1

Примерно так, но не очень уверен, т.к. чертеж не понятен полностью.

var otvet:boolean;
      x,y:integer;
begin
readln(x,y);
otvet:=((x in [3..4]) and ((y in [3..4]) or (y in [-4..-3])));
writeln(otvet);
end.