旋转体与横截面可视化

GeoGebra 命令及参数

1. Textfield(f) → InputBox1
2. Textfield(a) → InputBox3
3. Textfield(b) → InputBox4
4. Textfield(n) → InputBox5
5. Textfield(g) → InputBox2
6. Rotate(h, rAngle, Line[(0, g(0), 0), (1, g(0), 0)]) → f_1
7. Textfield(rectangleHeight) → InputBox6
8. Sequence(Prism[Polygon[(k, g(k), 0), (k, f(k), 0), (k, (f(k) + g(k)) / 2, abs(rectangleHeight(f(k) - g(k))))], dk], k, a, b - dk, dk) → L2
9. Sequence(Prism[Polygon[(k, g(k), 0), (k, f(k), 0), (k, f(k), abs(rectangleHeight(f(k) - g(k)))), (k, g(k), abs(rectangleHeight(f(k) - g(k))))], dk], k, a, b - dk, dk) → L1
10. Sequence(Cylinder[(k, g(k), 0), (k + dk, g(k), 0), f(k) - g(k)], k, a, b - dk, dk) → L
11. Sequence(Cylinder[(k, (f(k) + g(k)) / 2, 0), (k + dk, (f(k) + g(k)) / 2, 0), (f(k) - g(k)) / 2], k, a, b - dk, dk) → L3