ПОМОГИТЕ, ПОЖАЛУЙСТА!!! "Требуется написать программу, которая получает с клавиатуры координаты точки на плоскости (x,y – действительные числа) и определить принадлежность точки заштрихованной области, включая ее границы."

Пожалуйста.

var x,y:real;beginwrite('x, y:');readln(x,y);if (x*x+y*y>=4)and(abs(x)<=2)and(abs(y)<=2) then writeln('Точка принадлежит заштрихованной области') else writeln('Точка не принадлежит заштрихованной области');end.Пример:x, y:1.6 -1.6Точка принадлежит заштрихованной области