Паскаль Вычисление площади

[Unikummm]

Нашёл наиточнейшие формулы заданных фигур(эллипса и окружности): Окр. (x-sqrt{600}-38)^2+(y+5)^2= 625
эллипс: (Х-{5*sqrt{1023}/{8})^2}/{400} + {(Y-8)^2}/{1024}=1

Помогите с составлением программного кода

[0101]

Уравнение окружности: x^2+y^2=R^2
Окружность со смещённым центром: (x-xo)(x-xo)+(y-yo)(y-yo)=R^2
Для программного кода это будет так:
if (x>0)and((x-xo)*(x-xo)+(y-yo)*(y-yo))<R^2 writeln ('точка попадает в закрашенную область') else writeln ('Точка не попадает в звкрашенную область')

[Тупой]

0101, Вы из какой галактики?
по делу:
А никому не кажется что вертикальный эллипс недоопределен?
Ну, то что максимум находится в точке с ординатой в 40, а правая вершина в точке (9;0) это я понял... Но ведь с такими начальными условиями можно нарисовать не один эллипс, который также в первой координатной плоскости будет пересекать окружность... Либо я чтото не дочитал, либо чтото неправильно...

[0101]

А ты задание прочитай нормально, я же только некоторую часть задачи написал как искать окружность со смещенным центром. В этой задачи надо его обязательно его найти.

[Тупой]

>>надо его обязательно его найти.
кого его?

[puporev]

кого его?

Центр окружности.

[Тупой]

А как я его найду с помощью уравнения ((x-xo)*(x-xo)+(y-yo)*(y-yo))<R^2 ?? Вы хоть на картинку смотрел ктонибудь? Тут надо найти площадь, используя численное интегрирование. Формулы для вычисления интегралов давно известны, основная проблема в том, чтобы определить уравнение кривых, которые должны стоять в приделах интегрирования. Я конечно, может быть, чтото не понимаю, но тут не проблема в уравнинии окружности, которое дается на фарзаце учебников для 7 класса...