Составить программку, содержащую ветвления и определяющую, принадлежит ли точка с координатами

Важно знать, какая конкретно область заштрихована. Часто это прямоугольник или круг.
Решение для прямоугольника. Пусть заштрихованная область - прямоугольник с координатами вершин (a,d), (b,d), (b,c), (a,c) (см. набросок http://bit.ly/2n73Ffq). На вход подаются числа a,b,c,d а также координаты точки - x,y. Программка на Паскале будет выглядеть так:
var a,b,c,d,x,y: real;
begin
writeln( Введите границы области);
readln(a,b,c,d);
writeln(Введите координаты точки);
readln(x,y);
if (xgt;a and xlt;b) and (ygt;c and ylt;d) then writeln(Точка принадлежит выделенной области) else writeln(Точка не принадлежит области);
readln;
end.

В случае круга для принадлежности точки с координатами х, у области круга нужно чтоб выполнялось условие: (x-a)^2+(y-b)^2lt;r^2, где a и b - координаты центра окружности, r - ее радиус. Переменные а, b r будут входными данными.