已知截面的立体图形

GeoGebra 命令及参数

1. Segment(A, B) → b
2. Textfield(f) → InputBox1
3. Textfield(g) → InputBox2
4. Polygon(A, B, C, D) → poly1, a_1, b_1, c, d
5. Textfield(e) → InputBox3
6. Textfield(h) → InputBox4
7. CurveCartesian(t, f(t), t, e, h) → i
8. CurveCartesian(t, g(t), t, e, h) → j
9. Polygon(A, B, E) → poly2, e_1, a_2, b_2
10. Midpoint(A, B) → F
11. Segment(H, I) → q
12. Polygon(I, H, (x(H), y(H), Distance[H, I]), (x(I), y(I), Distance[H, I])) → q1, r, s, t, f_1
13. Segment(J, K) → g_1
14. Polygon(J, K, (x(K), y(K), Distance[K, J]), (x(J), y(J), Distance[K, J])) → q2, j_1, k_1, h_1, i_1
15. Polygon(L, M, (x(M), y(M), Distance[M, L]), (x(L), y(L), Distance[M, L])) → Q3, l_1, m_1, n_1, p_1
16. Polygon(I, H, (x(H), (0.5 * (y(I) + y(H))), (0.87 * Distance[I, H]))) → Q4, q_1, r_1, s_1
17. Polygon(J, K, (x(K), (0.5 * (y(J) + y(K))), (0.87 * Distance[J, K]))) → Q5, t_1, j_2, k_2
18. Polygon(L, M, (x(M), (0.5 * (y(L) + y(M))), (0.87 * Distance[L, M]))) → Q6, c_1, l_2, m_2