написать программку в паскаль с помошью условного оператора,принадлежит ли точка закрашенной

1.
График - часть графика y=5/4*IxI-5 до скрещения с осью Ox.
Program BiFi;
Var x,y:real;
Begin 
readln(x,y);
if (ylt;=0) and (ylt;=5*абс(x)/4 - 5) then writeln('prinadlezit')
else writeln(' ne prinedlezit');
readln;
end.

2.
График - половина кольца с радиусами 2 и 4.
Program BiFi;
Var x,y:real;
Begin
readln(x,y);
if (xgt;=0) and (x*x+y*ylt;=4) and (x*x+y*ygt;=2) then writeln('prinadlezit')
else writeln('ne prinadlezit);
readln;
end.

3.
График состоит из четверти окружности  радиусом 3 в II коорд. четверти и долею прямой y=3-x/2, ограниченной I коорд. четвертью.
Program BiFi;
Var x,y:real;
Begin
readln(x,y);
if ygt;=0 then if (xlt;=0) and (x*x+y*ylt;=3) then writeln('prinadlezit')
                                           else if (xgt;=0) and (ylt;=3-(x/2)) then writeln('prinadlezit')
                                                                                    else writeln('ne prinadlezit')
          else writeln(' ne prinadlezit');
readln;
end.