圆的面积计算与几何作图 by Bed Prasad Dhakal

GeoGebra 命令及参数

1. Segment(A, (x(A) + 2, y(A))) → a
2. Point(a) → B
3. Point(yAxis) → O
4. Sequence((x(O) + ((t * sin((i * φ))) * cos((i * φ)) / sin(φ)), y(O) + ((t * sin((i * φ))) * sin((i * φ)) / sin(φ))), i, 0, (2 * n)) → list2
5. Sequence((x(O) + sin((i * θ)), y(O) + 1 - cos((i * θ))), i, 0, (2 * n)) → list1
6. Sequence(Rotate[Translate[Circle[(x(O) + 0, y(O) + 1), Element[list1, i]], Vector[Element[list1, i], Element[list2, i]]], (((-((2 * i) - 1)) * k) * θ / 2), Element[list2, i]], i, 1, (2 * n)) → circlerotate
7. Sequence(Rotate[Translate[Element[list1, i], Vector[Element[list1, i], Element[list2, i]]], (((-((2 * i) - 1)) * k) * θ / 2), Element[list2, i]], i, 1, (2 * n)) → firstpointrotate
8. Sequence(Rotate[Translate[Element[list1, i + 1], Vector[Element[list1, i], Element[list2, i]]], (((-((2 * i) - 1)) * k) * θ / 2), Element[list2, i]], i, 1, (2 * n)) → secondpointrotate
9. Sequence(Sector[Element[circlerotate, i], Element[firstpointrotate, i], Element[secondpointrotate, i]], i, 1, (2 * n)) → sector4
10. Mirror(sector4, g) → sector3
11. Mirror(sector4, f) → sector1
12. Mirror(sector3, f) → sector2
13. Vector(P, (x(P) + v, y(P) - b)) → T
14. Translate(sector1, T) → sector1move
15. Translate(sector2, T) → sector2move
16. Circle((0, 1), 1) → c
17. CircleArc((0, 1 / (1 - m)), O, L) → s
18. Segment(C, D) → h
19. Point(xAxis) → F
20. Segment(E, F) → r