积分与黎曼和的几何构造

GeoGebra 命令及参数

1. CurveCartesian(mx(i), my(i), i, ax, ay) → d
2. Sequence(d(ax + (k * (ay - ax) / n)), k, 0, n, 1) → points2d
3. Sequence(d(ax + (k * (ay - ax) / n)) + (0, 0, 0), k, 0, n, 1) → pts3d
4. Sequence((x(Element[points2d, k]), y(Element[points2d, k]), f(x(Element[points2d, k]), y(Element[points2d, k]))), k, 1, n + 1, 1) → pointsurface
5. Textfield(f) → InputBox1
6. Textfield(mx) → InputBox2
7. Textfield(my) → InputBox3
8. Textfield(ax) → InputBox4
9. Textfield(ay) → InputBox5
10. Sequence(Segment[Element[points2d, k], Element[points2d, k + 1]], k, 1, n) → partition2d
11. Sequence((f(d(ax + ((k - 1 + R) * (ay - ax) / n))) * Element[partition2d, k]), k, 1, n) → heightsurface, {}
12. If(Final ≟ Initial ∧ n ≟ 2, Element[heightsurface, 2], Polygon[(1, 0), (1, 0)]) → condition1
13. Textfield(n) → InputBox6
14. Sequence(d(ax + ((k - 1 + R) * (ay - ax) / n)) + (0, 0, 0), k, 1, n) → list1
15. Sequence((x(Element[list1, i]), y(Element[list1, i]), f(Element[list1, i])), i, 1, n) → list2
16. Sequence((x(Element[pts3d, i]), y(Element[pts3d, i]), z(Element[list2, i])), i, 1, n) → list3
17. Sequence((x(Element[pts3d, i + 1]), y(Element[pts3d, i + 1]), z(Element[list2, i])), i, 1, n) → list4
18. Sequence(Polygon[Element[pts3d, k], Element[pts3d, k + 1], Element[list4, k], Element[list3, k]], k, 1, n) → rectangles