Координаты точки(x, y). Написать программу, котрая определяет, в какой координатной четверти находится точка.
Это задача 8 класса по информатике, помогите пожалуйста!!!

var x, y: integer;beginreadln(x,y);if x>0 then if y>0 then writeln('1') else writeln('4')else if y>0 then writeln('2') else writeln('3');end.

var x, y: integer;beginreadln(x,y);if x>0 then     if y>0 then writeln('1')    else writeln('4')else if y>0 then writeln('2')      else writeln('3');end.