Составить программу, по которой определяется лежит ли точка с заданными координатами (x y) внутри заштрихованной области.
Помогите пожалуйста!

для того чтобы точка принадлежала заданной области - её координата -3<X<0 и -3<y<0программа на pascalvar X,Y :integer;beginwrite('введите координату Х');readln(X);write('введите координату Y');readln(Y);if (X>(-3)) and (X<0) and (Y>(-3)) and (Y<0) then write('точка принадлежит области')         else write('точка не принадлежит области');end.