Определить принадлежит ли точка с координатами (X;Y) заштрихованной части плоскости.
//PascalABC.Net 3.2 begin //true - если принадлежит, false - если не принадлежит var x:=readreal ('x ='); var y:=readreal ('y ='); write ((sqrt(y*y+x*x)<=1) and (y>=0) and (y>=-x)); end.