分数乘法 by Amsavalli

GeoGebra 命令及参数

1. Textfield(n) → InputBox1
2. Textfield(d) → InputBox2
3. Textfield(n2) → InputBox3
4. Textfield(d2) → InputBox4
5. Point(Circle[A, 5]) → B
6. Polygon(A, B, C, D) → q1, a, b, c, d_1
7. Point(Circle[E, 5]) → F
8. Polygon(E, F, G, H) → q2, e, f, g, h
9. Sequence(Segment[(x(A) + i, y(A)), (x(B) + i, y(B))], i, 0, 4, 4 / d) → l1
10. Sequence(Segment[(x(F), y(F) + i), (x(G), y(G) + i)], i, 0, 5, 5 / d2) → l2
11. Segment(B, C) → i
12. Segment(A, D) → j
13. Segment(G, H) → k
14. Segment(E, F) → l
15. Translate(l1, Vector[A, I]) → l1'
16. Translate(l2, Vector[F, J]) → l2'
17. Translate(B, Vector[A, I]) → B'
18. Translate(C, Vector[A, I]) → C'
19. Segment(B', C') → i'
20. Translate(A, Vector[A, I]) → A'
21. Translate(D, Vector[A, I]) → D'
22. Segment(A', D') → j'
23. Translate(G, Vector[F, J]) → G'
24. Translate(H, Vector[F, J]) → H'
25. Segment(G', H') → k'
26. Translate(E, Vector[F, J]) → E'
27. Translate(F, Vector[F, J]) → F'
28. Segment(E', F') → l'
29. Polygon(A', A' + ((n / d * 4), 0), A' + ((4 * n / d), (5 * n2 / d2)), A' + (0, (n2 / d2 * 5))) → q5, h_1, i_1, j_1, k_1
30. If(n ≤ d ∧ n2 ≤ d2 ∧ d ≠ 0 ∧ d2 ≠ 0 ∧ n ≠ 0 ∧ n2 ≠ 0, true, false) → u
31. Point(Circle[Q, 0.75]) → R
32. Segment(Q, R) → p
33. Point(Circle[O, 0.75]) → P
34. Segment(O, P) → m
35. Polygon(A', B', B' + ((4 * n / d), 0), A' + ((4 * n / d), 0)) → q3, q, r, l_1, m_1
36. Polygon(F', G', G' + (0, (5 * n2 / d2)), F' + (0, (5 * n2 / d2))) → q4, s, t, f_1, g_1
37. Line(K, L) → n_1
38. Line(M, n_1) → p_1