海平面高度：整数比较与数轴练习

GeoGebra 命令及参数

1. Sequence(RandomElement[Join[{2…3, -5…-1, Remove[-5…5, {0}]}]], k, 1, 100) → HeightList, {-2, -4, -5, -2, -1, -1, 1, -3, -2, -2, -2, 3, 4, -1, 2, -1, -2, 1, -5, -2, 2, -2, 2, -4, -3, -1, -1, 1, 3, 2, -3, -4, -4, 2, 2, 2, 2, -3, -3, 2, -1, 5, -1, -2, -2, -2, 1, 2, -3, 1, 2, 4, -5, 5, -3, -5, 3, -3, 5, 5, 5, -5, 3, -5, -3, 4, -4, 2, -2, 4, 2, 3, -4, 4, 3, -4, -2, -5, -5, -3, -4, -3, 2, -3, -5, -4, 4, -2, -1, 5, -1, -5, 2, 2, -1, 2, -3, -2, 1, -1}
2. Segment(PosImg11 + (1.25, 0), PosImg11 + (1.25, 9)) → seg1
3. Sequence(Point[seg1, 0] + (0, 0.375) + (k * (0, 0.8)), k, 0, 10) → PosList
4. Line(PosImg11 + (1.25, 0), PosImg11 + (1.25, 9)) → ax1
5. Intersect(seg02, ax1) → PointP
6. If(Case ≟ 1, correct1 ∧ correctdd, correct2) → correct
7. Sequence(Random[1, 10], i, 1, 10) → randomNumbers, {9, 8, 1, 4, 6, 7, 3, 9, 3, 6}
8. Element(randomNumbers, Mod[questionCount, Length[randomNumbers]] + 1) → randomNumber
9. Sequence(Segment[PosList(k) + (-0.25, 0), PosList(k) + (0.25, 0)], k, 1, 11) → SegList
10. Sequence(Text[(("$\textsf{" * abs(k)) * " m}$"), PosList(k + 6) + (-0.25, 0.09), false, true, -1, 0], k, -5, 5) → CapList
11. Textfield(input1) → InputBox1
12. Segment(PosList(pos) + (-1.25, 0), PosList(pos) + (10.75, 0)) → seg01
13. Sequence(Segment[PosList(k) + (-1.25, 0), PosList(k) + (10.75, 0)], k, 1, 11) → SegList2
14. Point(PosList) → PointA
15. PolyLine(PointA + {(-1.25, 0), (10.75, 0)}) → seg03
16. Polygon(Corner[pic1, 1], Corner[pic1, 2], Corner[pic1, 3], Corner[pic1, 4]) → poly1, segpoly11, segpoly12, segpoly13, segpoly14
17. If(Case ≟ 1, Defined[input1] ∧ SelectedIndex[dropdown] ≠ 1, attemptCount > 1, moved, true) → clickableBtnValidate
18. Segment(PosList(pos) + (-1.25, 0), PosList(pos) + (10.75, 0)) → segSol2