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

Program Rick_and_Morty;
var x,y:integer;
Begin
write('введите x: ');
readln (x);
write('введите y: ');
readln (y);
if ((xgt;=0) and (ygt;=0) and (x*x+y*ylt;=25))
or ((xgt;=0) and (ygt;=0) and (x*x+y*ygt;=9))
or ((xgt;=0) and (ylt;=0) and (x*x+y*ylt;=25))
or ((xgt;=0) and (ylt;=0) and (x*x+y*ygt;=9))
then 
writeln('(',x,',',y,') - входят в облость')
else 
writeln('(',x,',',y,') - не входят в облость');

writeln('конец');
end.