Составить программу, которая печатает true, если точка с координатами (x, y) принадлежит закрашенной области, и false в противном случае.
Var x,y : real; begin write('x = '); readln(x); write('y = '); readln(y); writeln((x*x+y*y<=1)and(y<=x+1));<br>end. Пример: x = 0.6 y = -0.6 True