(ax+b)(cx+d) 乘法展开的可视化几何演示

GeoGebra 命令及参数

1. Textfield(a) → InputBox1
2. Textfield(b) → InputBox2
3. Textfield(c) → InputBox3
4. Textfield(d) → InputBox4
5. Segment(O, A) → f
6. Sequence(Sequence[Polygon[O + (f * (i, j)), A + (f * (i, j)), 4], i, 0, a - 1], j, 0, c - 1) → l1
7. Sequence(Sequence[Polygon[{B, B + (1, 0), B + (1, f), B + (0, f)} + (i, (f * j))], i, 0, b - 1], j, 0, c - 1) → l2
8. Sequence(Sequence[Polygon[{C, C + (f, 0), C + (f, 1), C + (0, 1)} + ((i * f), j)], i, 0, a - 1], j, 0, d - 1) → l3
9. Sequence(Sequence[Polygon[D + (i, j), D + (1 + i, j), 4], i, 0, b - 1], j, 0, d - 1) → l4
10. If(e ≤ 1, B + (e * (E - B)), E) → F
11. Translate(l2, Vector[B, F]) → l2'
12. If(e ≤ 1, D, If[1 ≤ e ≤ 2, D + ((e - 1) * (G - D)), G]) → H
13. Rotate(Translate[l3, Vector[D, H]], If[e ≤ 1, 0, If[1 ≤ e ≤ 2, ((-(e - 1)) * π / 2), ((-π)) / 2]], H) → l5
14. If(e ≤ 2, D, If[2 ≤ e ≤ 3, D + ((e - 2) * (I - D)), I]) → J
15. Translate(l4, Vector[D, J]) → l4'
16. Textfield(a) → InputBox1_{1}
17. Textfield(b) → InputBox2_{1}
18. Textfield(c) → InputBox3_{1}
19. Textfield(d) → InputBox4_{1}
20. Textfield(a) → InputBox1_{2}
21. Textfield(b) → InputBox2_{2}
22. Textfield(c) → InputBox3_{2}
23. Textfield(d) → InputBox4_{2}
24. VerticalText(text12) → text13
25. Textfield(a) → InputBox1_{3}
26. Textfield(b) → InputBox2_{3}
27. Textfield(c) → InputBox3_{3}
28. Textfield(d) → InputBox4_{3}
29. Textfield(a) → InputBox1_{4}
30. Textfield(b) → InputBox2_{4}
31. Textfield(c) → InputBox3_{4}
32. Textfield(d) → InputBox4_{4}
33. Textfield(a) → InputBox1_{5}
34. Textfield(b) → InputBox2_{5}
35. Textfield(c) → InputBox3_{5}
36. Textfield(d) → InputBox4_{5}