Question

Паскаль! помогите срочно решить задачу!

Answer 1

Общее уравнение окружности в декартовой системе координат:
(x-x0)²+(y-y0)²=R²
Задаем уравнения для нашей окружности:
x²+y²=36
Закрашенные области попадают в 2, 3 и 4 четверти на плоскости, поэтому вводим дополнительные условия:
(x<=0) или (x>=0 и y<=0)

Решение на Pascal'е:
var x,y: real;
begin
readln(x);
readln(y);
if ((x*x+y*y<=36) and (x<=0)) or ((x*x+y*y<=36) and (x>=0) and (y<=0)) then writeln('Попадает.') else writeln('Не попадает');
end.