分数乘法面积模型 by Celia Jimenez

GeoGebra 命令及参数

1. Point(Circle[A, 5]) → B
2. Segment(A, B) → a
3. Polygon(A, B, 4) → poly1, b, c, d, e, C, D
4. Line(A, B) → f
5. Point(f) → E
6. Segment(A, E) → g
7. Point(g) → F
8. Point(Circle[F, 5]) → G
9. Segment(F, G) → h
10. Polygon(F, G, 4) → poly2, i, j_1, k_1, l, H, I
11. Dilate(B, 1 / part_1, A) → B_1
12. Sequence(Segment[Translate[D, Vector[i * Vector[A, B_1]]], Translate[A, Vector[i * Vector[A, B_1]]]], i, 1, part_1 - 1) → list1
13. Dilate(H, 1 / part2, G) → H_1
14. Sequence(Segment[Translate[F, Vector[i * Vector[G, H_1]]], Translate[G, Vector[i * Vector[G, H_1]]]], i, 1, part2 - 1) → list2
15. Translate(A, Vector[num_1 * Vector[A, B_1]]) → B_2
16. Translate(B_2, Vector[A, D]) → C_2
17. Translate(G, Vector[num_2 * Vector[G, H_1]]) → H_2
18. Translate(H_2, Vector[G, F]) → I_2
19. Polygon(A, B_2, C_2, D) → poly3, a_1, b_2, c_2, d_1
20. Polygon(F, G, H_2, I_2) → poly4, f_1, g_1, h_2, i_2
21. Line(B_2, C_2) → j
22. Line(I_2, H_2) → k
23. Intersect(j, k) → S
24. Polygon(A, B_2, S, I_2) → poly5, a_2, b_1, s, i_1
25. If(Distance[A, F] < 0.01, true, false) → over
26. Segment(J, K) → m
27. Segment(L, M) → n