分数加法演示 by zagjudit

GeoGebra 命令及参数

1. Random(2, 10) → D1
2. Random(2, 10) → D2
3. Random(1, D1 - 1) → N1
4. Random(1, D2 - 1) → N2
5. Circle((5, 5), 1.5) → C1
6. Sequence(Rotate[B, 360° * i / D1, (5, 5)], i, 1, D1) → list1
7. Sequence(Segment[A, Element[list1, i]], i, 1, D1) → list2
8. Sector(C1, B, Element[list1, N1]) → c_1
9. Circle((9, 5), 1.5) → C2
10. Sequence(Rotate[D, 360° * i / D2, (9, 5)], i, 1, D2) → list3
11. Sequence(Segment[C, Element[list3, i]], i, 1, D2) → list4
12. Sector(C2, C, Element[list3, N2]) → d_1
13. Circle((5, 1), 1.5) → C3
14. Circle((9, 1), 1.5) → C4
15. Sequence(Rotate[F, 360° * i / a, E], i, 1, a) → list5
16. Sequence(Segment[E, Element[list5, i]], i, 1, a) → list6
17. Sector(C3, E, Element[list5, b]) → e
18. Circle((5, 1), 1.5) → C5
19. Sequence(LCM[D1, D2] * i, i, 1, 5) → Possible
20. Sequence(Rotate[H, 360° * i / d, G], i, 1, d) → list7
21. Sequence(Segment[G, Element[list7, i]], i, 1, d) → list8
22. Sector(C4, G, Element[list7, c]) → g
23. Circle(G, 1.5) → C6
24. Textfield(ans5) → inputBox5
25. Segment(M, N) → j
26. If(ans6 ∈ Possible, true, false) → S
27. Textfield(ans1) → inputBox1
28. Vector(O, P) → u