Принадлежит ли точка заштрихованной области?
Написать программу на Pascal или C++

Ответ:

begin

 var (x, y) := ReadReal2();

 var a := (x>=0) and (y>=0) and (y <= -x/5 + 1);

 var b := (x<=0) and (y<=0) and (y >= -x/5 - 1);

 var c := (x*x + y*y <= 1) and (x > 0) and (y < 0);

 var d := (x*x + y*y <= 1) and (x < 0) and (y > 0);

 Print(a or b or c or d);

end.

Объяснение: