线性增长建模：可动态修改的直线与斜率演示

GeoGebra 命令及参数

1. Dilate(B, If[0 < a ≤ 1, 1 - a, 0], A) → B'
2. Vector(B, B') → u
3. Dilate(A, If[2 < a ≤ 3, 3 - a, 0], C) → A'
4. Vector(A, A') → v
5. Dilate(C, If[3 < a ≤ 4, 4 - a, 0], D) → C'
6. Vector(C, C') → w
7. Dilate(D, If[5 < a ≤ 6, 6 - a, 0], E_{1}) → D'
8. Vector(D, D') → c
9. Dilate(E_{1}, If[6 < a ≤ 7, 7 - a, 0], E) → E'
10. Vector(E_{1}, E') → e
11. Dilate(A, If[8 < a ≤ 9, 9 - a, 0], D) → A'_{1}
12. Segment(A, A'_{1}) → g
13. Dilate(D, If[9 < a ≤ 10, 10 - a, 0], E) → D'_{1}
14. Segment(D, D'_{1}) → h
15. Random(-10, 10) → b_1
16. Random(-10, 10) → n_1
17. Random(1, 10) → d_1
18. If(n ≥ 0, "earn", "lose") → text7
19. If(d > 1, "hours", "hour") → text8
20. Textfield(p) → InputBox3
21. Textfield(o) → InputBox1
22. If(o ≟ n_1 / d_1, "Yes!", "no") → text9
23. If(p ≟ q, "Yes!", "no") → text10