旋转对称图形的 GeoGebra 演示

GeoGebra 命令及参数

1. Circle(A, B) → c
2. Segment(A, B) → a
3. Rotate(B, θ, A) → B_1
4. Segment(B_1, B) → b
5. Midpoint(A, B) → C
6. Midpoint(B, B_1) → D
7. Segment(A, D) → d
8. Segment(B_1, C) → e
9. Intersect(d, e) → E
10. Polygon(B_1, E, D) → polyG, d_1, b', e_1
11. Polygon(B_1, A, E) → polyO, e_2, b'_1, a_1
12. Polygon(A, C, E) → polyB, e_3, a_2, c_1
13. Segment(E, B) → f
14. Polygon(D, E, B) → polyP, b_1, d_2, e_4
15. Polygon(E, C, B) → polyY, b_2, e_5, c_2
16. Rotate(E, θ, A) → E'
17. Rotate(D, θ, A) → D'
18. Rotate(C, θ, A) → C'
19. Rotate(E, θ, A) → E'_1
20. Sequence(Polygon[Rotate[D, (k * θ), A], Rotate[E, (k * θ), A], Rotate[B, (k * θ), A]], k, 1, n) → pink
21. Sequence(Polygon[Rotate[B_1, (k * θ), A], Rotate[E, (k * θ), A], Rotate[D, (k * θ), A]], k, 1, n) → green
22. Sequence(Polygon[Rotate[A, (k * θ), A], Rotate[C, (k * θ), A], Rotate[E, (k * θ), A]], k, 1, n) → blue
23. Sequence(Polygon[Rotate[B_1, (k * θ), A], Rotate[A, (k * θ), A], Rotate[E, (k * θ), A]], k, 1, n) → orange
24. Sequence(Polygon[Rotate[E, (k * θ), A], Rotate[C, (k * θ), A], Rotate[B, (k * θ), A]], k, 1, n) → yellow