Question

Напишите программу, которая определяет, попала ли точка с заданными координатами в заштрихованную область.

Входные данные
Входная строка содержит два вещественных числа – координаты точки на плоскости (сначала x -координата, затем – y -координата).

Выходные данные
Программа должна вывести слово 'YES', если точка попала в заштрихованную область, и слово 'NO', если не попала.

Примеры
входные данные
0.5 0.5
выходные данные
YES
входные данные
-0.5 -0.5
выходные данные
NO

Answer 1

Var x,y : real;
begin
readln(x,y);
if (x>=0)and(y<=1)and((x*x+y*y<=1)or(y>=x-1))
  then writeln('YES')
  else writeln('NO')
end.

Пример:
0.5 -0.5
YES