Login
VBA Школьная задачка
835 просмотров
Перейти к просмотру всей ветки
in Antwort Murr 13.03.10 22:18, Zuletzt geändert 14.03.10 11:30 (Vijon)
Диаметр поляны - 100 м. Значит, радиус - 50 м. Немножко перепутал. Но не суть...
По моему рисунку...
Площадь красного сектора:
S1=r^2*arcsin(y1/r)/PI
где y1 - ордината верхней точки пересечения.
Площадь одного из синих сегментов:
S2=1250*arcsin(y1/50)/PI-50^2*(y1/50)/2=1250*arcsin(y1/50)/PI-25*y1
Суммарная площадь:
S=S1+S2*2=r^2*arcsin(y1/r)/PI+2500*arcsin(y1/50)/PI-50*y1=r^2*arcsin((1-r^2/10000)^.5)/PI+2500*arcsin(r*(1-r^2/10000)^.5/50)/PI-50*r*(1-r^2/10000)^.5
При этом, S=1250*PI, r={50, 100}
r находится алгоритмом половинного деления по приведенным формулам.
По моему рисунку...
Площадь красного сектора:
S1=r^2*arcsin(y1/r)/PI
где y1 - ордината верхней точки пересечения.
Площадь одного из синих сегментов:
S2=1250*arcsin(y1/50)/PI-50^2*(y1/50)/2=1250*arcsin(y1/50)/PI-25*y1
Суммарная площадь:
S=S1+S2*2=r^2*arcsin(y1/r)/PI+2500*arcsin(y1/50)/PI-50*y1=r^2*arcsin((1-r^2/10000)^.5)/PI+2500*arcsin(r*(1-r^2/10000)^.5/50)/PI-50*r*(1-r^2/10000)^.5
При этом, S=1250*PI, r={50, 100}
r находится алгоритмом половинного деления по приведенным формулам.
I find my way through night and day'cause I know I just can't stayhere in heaven