弧长生成旋转曲面

GeoGebra 命令及参数

1. Sequence((a + (i * (b - a) / n), 0), i, 0, n, 1) → L_1
2. Sequence(x(Element[L_1, i]), i, 1, n + 1, 1) → xList
3. Sequence((Element[xList, i + 1], f(Element[xList, i + 1])), i, 0, n - 1, 1) → L_4
4. Union(L_4, L_3) → L_5
5. Sequence(Segment[Element[L_5, i], Element[L_5, i + 1]], i, 1, n, 1) → L_6
6. Sequence(y(Element[L_5, i]), i, 1, n + 1, 1) → yList
7. Sequence(Element[yList, i + 1] - Element[yList, i], i, 1, n, 1) → deltays
8. Sequence(CurveCartesian[Element[xList, i] + (t * deltax), Element[yList, i] + (t * Element[deltays, i]), t, 0, 1], i, 1, n, 1) → L_2
9. Sequence(Surface[Element[L_2, i], ang, xAxis], i, 1, n + 1, 1) → L_7
10. Textfield(f) → InputBox1
11. Textfield(a) → InputBox2
12. Textfield(b) → InputBox3
13. Textfield(n) → InputBox4