PascalABC. Составить программу, которая печатает True, если точка с координатами (x,y) .

var x,y:real; begin write('x y: '); readln(x,y); writeln((x>2)and(x*x+y*y<=36)) end.

А как заданы области? Допустим мы имеем красный прямоугольник на синем фоне и внутри прямоугольника белый круг. Точка внутри круга относится к закрашенной области?
Например мы могли бы использовать функцию getpixel, но тогда надо точно знать, точку какого цвета ищем.
А если область заштрихована, мы же можем попасть и между штрихами!