Написать программку по графику в Pascal. Задание в файле. Помогите пожалуйста

Если вопрос еще животрепещущ!
Тут необходимо отыскать уравнение границ заштрихованной области. Сверху имеем окружность с центром в точке (0,0) и радиусом, равным 6 (радиус можно посчитать по клеткам: и по оси горизонтальной и по оси вертикальной ровно 6 клеточек). Знаменито, что уравнение окружности с центром в т. (0,0) имеет вид: x+y=R. В нашем случае имеем: 
x+y=36. Так как необходимы точки снутри круга, то символ = необходимо поменять на . Имеем выражение для первой границы: x+y36.
Далее. Нижняя граница области - ровная, проходящая через точки (3,0) и (0,3). Тут очень просто построить уравнение прямой вида: y=ax+b. К примеру, подстановкой известных точек и решая систему уравнений: 0=a3+b и 3=a0+b. Получим, что b=3, a=-1. Тогда уравнение прямой воспримет вид: y=-x+3 либо y+x=3. Но необходимы точки выше данной прямой, означает, символ = необходимо поменять на ,т.е. получим в итоге 2-ое выражение: y+x3. В конце концов, следует также учитывать неотрицательность обеих координат, т.е. x0 и y0 (так как заштрихованная область находится только в 1й четверти координатной плоскости). Итак, достаточно проверить введенные координаты точки (x,y) на одновременное исполненье 4 критерий 
if (xgt;=0) and (ygt;=0) and (x+y3) and (x+y36) then writeln(True) else writeln(False)
--
Код программки на Паскале:

program z;
var x,y:real;
begin
readln(x,y);
if ((sqr(x)+sqr(y))lt;=36) and (x+ygt;=3)and(xgt;=0)and(ygt;=0) then writeln(true) else writeln(false);
end.