配方法可视化探索

GeoGebra 命令及参数

1. RandomElement({1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15}) → n
2. RandomElement({1, 2, 3, 4, 5}) → a
3. Circle(B, n) → p
4. Polygon(A, B, 4) → poly1, b, c, d, e, C, D
5. Ray(C, B) → k
6. Point(Circle[A, abs(n)]) → F
7. Segment(A, F) → g
8. Point(Circle[A, abs(n)]) → G
9. Segment(A, G) → h
10. Point(Circle[D, abs(n)]) → H
11. Segment(D, H) → i
12. Polygon(A, D, H, G) → poly3, a_2, d_1, h_1, g_1
13. Point(Circle[G, abs(n)]) → I
14. Segment(G, I) → j
15. Polygon(F, I, G, A) → poly4, f_2, i_1, g_2, a_3
16. PointIn(poly1) → Pointpoly1_1
17. PointIn(poly3) → Pointpoly3_1
18. PointIn(poly4) → Pointpoly4
19. PointIn(poly1) → Pointpoly1
20. Intersect(p, k) → E, J
21. Polygon(B, E, F, A) → poly2, b_1, e_1, f, a_1
22. PointIn(poly2) → Pointpoly2_1
23. PointIn(poly2) → Pointpoly2
24. PointIn(poly3) → Pointpoly3
25. Textfield(t) → inputBox1