Разработайте программу, которая выводит сообщение «Да», если точка с координатами принадлежит закрашенной области, и «Нет» в противном случае. 1) На рисунке закрашена часть квадрата , вне круга с центром в начале координат и радиусом 3. 2) На рисунке закрашены четверть кольца между окружностями радиусов 2 и 3 во II координатной четверти и четверть круга радиуса 2 в IV координатной четверти; центр окружностей — начало координат.
Первая область — четыре угловые части квадрата:
Вторая область состоит из четверти кольца и четверти внутреннего круга:
По уравнению окружности радиуса
var x, y, q: real;
in , in : boolean;
begin
readln(x, y);
q := x*x + y*y;
in := (x >= - ) and (x <= ) and
(y >= - ) and (y <= ) and (q >= );
in := ((x <= ) and (y >= ) and
(q >= ) and (q <= )) or
((x >= ) and (y <= ) and (q <= ));
if in then writeln(' ) Да')
else writeln(' ) Нет');
if in then writeln(' ) Да')
else writeln(' ) Нет')
end.
Переменная q вычисляет in соединены все условия квадрата и внешней части круга. В in первая скобка проверяет кольцо во II четверти, вторая — круг в IV четверти; or означает принадлежность хотя бы одной из них. Например,
- «Да» при
, и . - «Да» при
или .
