复利模型与问题

GeoGebra 命令及参数

1. Sequence(1000, 30000, 1000) → Plist
2. Random(1, 6) → chooser
3. If(chooser ≟ 1, 1, chooser ≟ 6, Infinity, chooser ≟ 2, 2, chooser ≟ 3, 4, chooser ≟ 4, 12, chooser ≟ 5, 365) → n
4. Sequence(i, i, 2, 8, 0.01) → rlist
5. RandomElement(rlist) → r
6. RandomElement(Plist) → P
7. If(chooser ≤ 5, (P * (1 + r / 100 / n)^((n * x))), (P * ℯ^((r / 100 * x)))) → f
8. If(chooser ≤ 5, f, g) → q
9. Random(round((1.2 * P), 0), round((2.5 * P), 0)) → A
10. Random(0, 1) → cont
11. Sequence(i, i, 3, 20, 0.1) → timelist
12. RandomElement(timelist) → time
13. RandomElement({1.5, 2, 2.5, 3}) → scalar
14. If(chooser ≟ 1, "annually", "continuously", chooser ≟ 2, "biannually", chooser ≟ 3, "quarterly", chooser ≟ 4, "monthly", chooser ≟ 5, "daily") → text1
15. Textfield(g) → InputBox1
16. Textfield(a) → InputBox2
17. Textfield(b) → InputBox3
18. Intersect(q, h, (9.853928433047047, 5802)) → B
19. If(round(x(B), 2) ≟ b, "√", "X") → text11
20. Textfield(c) → InputBox4
21. If(g ≟ q, "√", "X") → text7
22. If(round(q(time), 2) ≟ a, "√", "X") → text10
23. Intersect(q, p, (13.688894406566929, 7500)) → C
24. If(round(x(C), 2) ≟ c, "√", "X") → text12