Question

2. 2. Проверить принадлежит ли точка, заданная координатами, заштрихованной области.

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (x,y):=ReadReal2('Введите координаяты x и y точки:');
  Writeln((x<0) and (y>0) and (y<x+1) or (x>0) and (y<0) and (y>x-1))
end.

Примеры
Введите координаяты x и y точки: 0.5 -0.2
True

Введите координаяты x и y точки: -2 0.3
False