Определить , в каком квадранте находится точка (x, y) и вывести номер квадранта

ввод: x ^ y с/п.

п1 -> п0 x=0 07 0 с/п ип1 x=0 12 0 с/п

ип1 x> =0 22 ип0 x> =0 20 1 с/п 2 с/п

ип0 x< 0 27 3 с/п 4 с/п

с учётом моментов, когда точки лежат на осях.

varn: integer; beginreadln(n); n: = n div 10; n: =(n div 100)*10 +n mod 10; writeln(n); n: = (n mod 10)*100+ ((n mod 100) div 10)*10+ n div 100; writeln(n); end.

на один символ отводится 1 байт 30 строк по 70 символов - 2100 символов 5 страниц-это 10500 символов так что ответ 10500 байт