"Я самый главный!"- заявил монитор, на мне возникает информация и изображения.
"Нет, я самая главная,- сказала клавиатура, без меня никак, не сможешь ничего оттреадактировать,вбить информацию в память, общаться - да вообще ничего!"
Но память возразила : " Ээх вы, я тут главнее всех, как вы без меня! Ничего не сохранишь, не запомнишь, да в общем без меня очень сложно что-то представить!"
"Да вы что? - начал возмущаться процессор, - Главных не должно быть, мы все представляем собой одно целое!" Так они и воссоединились и представляют собой одну частичку главного .
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.
Объяснение: