РЕШИТЕ ЗАДАЧУ НА ПАСКАЛЕ Вводятся координаты точки на плоскости 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. // Конец программы