Проверено в PascalABC.NET
Всё хорошо работает(Скриншот):
Нужно знать как задаётся эта заштрихованная область.
Например для окружности нужно что бы x^2+y^2<R где R радиус, x,y координаты точки.
В общем случае нужно что бы выполнялось неравенство при поставление в него координат заданных пользователем.
Первым выполняется логическое умножение, т.е. B∧C