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.
Объяснение:
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.
Объяснение: