生长的头发 - 任务

GeoGebra 命令及参数

1. Polygon((0, 0), (0, 25), (30, 25), (30, 0)) → poly1, f, h, i, j
2. Intersect(g, h) → B
3. If(x(B) < 30, x(B), 30) → l_1
4. Root(g, 0) → C
5. If(x(C) < 0, x(D), x(C)) → l
6. RotateText("hair length in cm", 90°) → text4
7. Sequence(((2 * i), 9 + i), i, 0, 14) → list3
8. Sequence(((4 * i), 15 + i), i, 0, 7) → list4
9. Sequence(((4 * i), 12 + i), i, 0, 7) → list1
10. Sequence(((2 * i), (0.8 * i)), i, 0, 15) → list2
11. Textfield(deltax) → InputBox1
12. Textfield(initial) → InputBox2
13. Textfield(change) → InputBox3
14. Textfield(g) → InputBox4
15. Sequence(((deltax * i), initial + (change * i)), i, 0, 29) → list5
16. Sequence(Segment[A + ((deltax * i), (change * i)), A + ((deltax * (i + 1)), (change * i))], i, 0, 29) → list7
17. Sequence(Segment[A + ((deltax * (i + 1)), (change * i)), A + ((deltax * (i + 1)), (change * (i + 1)))], i, 0, 29) → list6
18. TableText({{p, k, l, k_1, k_2}, {A2, B2, C2, D2, E2}, {A3, B3, C3, D3, E3}, {A4, B4, C4, D4, E4}, {A5, B5, C5, D5, E5}, {A6, B6, C6, D6, E6}, {A7, B7, C7, D7, E7}, {A8, B8, C8, D8, E8}, {A9, B9, C9, D9, E9}, {A10, B10, C10, D10, E10}}, "|_r") → text6