РЕШИТЕ ЗАДАЧУ НА ПАСКАЛЕ Вводятся координаты точки на плоскости x и y.

Вывести TRUE, когда точка (x, y) находится в IV четверти (координатной плоскости), и FALSE в противном случае.

For example:

Input Result
-3 0
FALSE
4 3
FALSE
0 40
FALSE
8 0
FALSE
0 0
FALSE
1 -1
TRUE
+2000000000 -2000000001
TRUE
1 10
FALSE

begin

 var (x, y) := readinteger2;

 if (x > 0) and (y < 0) then

   write('TRUE')

 else

   write('FALSE')

end.

Объяснение:

begin  // Начало программы

 var (x, y) := readinteger2;  // Вводим координаты x, y с клавиатуры

 if (x > 0) and (y < 0) then  // Если (x > 0 И y < 0), тогда

   write('TRUE') // Выводим TRUE

 else  // Иначе

   write('FALSE')  // Выводим FALSE

end. // Конец программы