分数数轴加法演示

GeoGebra 命令及参数

1. Sequence((x(A + (k * a)), y(A)), k, 0, 100, 1) → list1
2. Sequence(Text[k, (x(A) + (k * a), y(A) - 0.5)], k, 0, 100, 1) → list2
3. Ray((x(A), y(A)), (x(A) + 10, y(A))) → b
4. Sequence((x(A) + (k * a / d), y(A)), k, 0, 100, 1) → list3
5. Sequence(Segment[(x(A) - 0.2 + (k * a / d), y(A) + 0.8), (x(A) + 0.2 + (k * a / d), y(A) + 0.8)], k, 0, 100, 1) → list7
6. Sequence(Text[k, (x(A) + (k * a / d) - 0.05, y(A) + 0.9)], k, 0, 9, 1) → list4
7. Sequence(Text[k, (x(A) + (k * a / d) - 0.12, y(A) + 0.9)], k, 10, 100, 1) → list6
8. If(d < 10, Sequence[Text[d, (x(A) + (k * a / d) - 0.05, y(A) + 0.5)], k, 0, 100, 1], Sequence[Text[d, (x(A) + (k * a / d) - 0.09, y(A) + 0.5)], k, 0, 100, 1]) → list5
9. Ray(B, (100, 0.8)) → c
10. Text(text2, (7.5, -0.6)) → text3
11. RandomElement(den) → denom
12. RandomElement(num) → numer
13. Textfield(c_{rtext}) → InputBox1
14. Segment(G, H) → l
15. Length(Text[d]) → m
16. Length(Text[c_r]) → o
17. Textfield(c_{r1text}) → inputBox1
18. Segment((x(B), y(B)), (x(B) + (p_1 * a / d), y(B))) → j_1
19. Vector((x(B), y(B)), (x(B) + (q * a / d), int + (slp * (x(A) + (q * a / d))))) → u
20. Translate(j_1, u) → r
21. Segment((x(A), y(A)), (x(A) + (p * a / d), y(A))) → j
22. Segment(I, J) → e_1
23. Sequence((x(B) + (s * a / d), y(B)), s, 0, 100, 1) → list8
24. Sequence((x(B + (k * a)), y(B)), k, 0, 100, 1) → list9
25. Length(Text[c1_r]) → w
26. Length(Text[c_r + c1_r]) → f_1
27. Segment(K, L) → g_1
28. Segment(M, N) → h_1
29. Segment(O, P) → i_1