矩形剖分为正方形的几何构造与变换

矩形剖分为正方形的几何构造与变换
几何画板及绘图内容加载中,请稍等……
2012-08-16 09:53
本 GeoGebra 范例动态演示了如何将一个矩形通过几何剖分(Dissection)重组拼接为等面积正方形的数学过程。涉及的核心数学概念包括平面几何中的等积变换、图形剖分与重组、几何变换(平移与旋转)以及面积守恒定律。在作图要点上,该工具巧妙运用了 GeoGebra 的 `Sequence`、`Polygon`、`Segment`、`Rotate`、`Translate`、`Intersect`、`Midpoint`、`Vector` 和 `Distance` 等命令,对点 A、B、C、D、E、F、G、H、I、J 等关键几何对象进行序列生成与变换,动态构建多边形 poly1、poly2、poly3 及其变换后的对应图形,清晰呈现割补法的每一步几何构造。该范例非常适合高中阶段几何与变换课程、数学探究活动或几何作图兴趣小组,用于直观理解等积变形与几何分割的奥秘。

GeoGebra 命令及参数

  1. Sequence((x(A), y(A) - 3 - 0.1 * i), i, 0, 50) → list2
  2. Point(list2) → B''
  3. Sequence((x(A) + 3 + 0.1 * i, y(A)), i, 0, 50) → list1
  4. Point(list1) → D''
  5. Polygon(A, B, C, D) → poly1, a, b, c, d
  6. Point(c) → E
  7. Point(b) → F
  8. Segment(E, F) → e
  9. Point(Segment[F, C]) → G
  10. Point(d) → H
  11. Point(e) → I
  12. Point(e) → J
  13. Segment(G, I) → GI
  14. Segment(H, J) → HJ
  15. Polygon(A, B, F, J, H) → poly2, a_1, b_1, f_1, j, h
  16. Rotate(D, -α, J) → D'
  17. Rotate(E, -α, J) → E'
  18. Rotate(J, -α, J) → J'
  19. Rotate(H, -α, J) → H'
  20. Polygon(D', E', J', H') → poly3, d', e', j', h'
  21. Translate(C, Vector[E, E']) → C'
  22. Translate(E, Vector[E, E']) → E'_1
  23. Translate(I, Vector[E, E']) → I'
  24. Translate(G, Vector[E, E']) → G'
  25. Polygon(C', E'_1, I', G') → poly4, c', e'_1, i', g'
  26. Rotate(F, -α, F) → F'
  27. Rotate(G, -α, F) → G'_1
  28. Rotate(I, -α, F) → I'_1
  29. Polygon(F', G'_1, I'_1) → poly5, i'_1, f', g'_1
  30. Intersect(Circle[D, Distance[F, B]], d) → H_1,
  31. Intersect(Circle[A, sqrt(a * b)], d) → H_2,
  32. Intersect(Circle[F, Distance[B, F]], Ray[F, C]) → G_1,
  33. Midpoint(C, D) → M
  34. Intersect(Circle[B, Distance[D, H]], b) → F_1, K_2
  35. Segment(A - (1, 0), A - (1.5, 0)) → i
  36. Translate(i, Vector[A, A - (0, y(A) - y(C'))]) → i'_2
  37. Segment(A + (0, 1), A + (0, 1.5)) → k
  38. Translate(k, Vector[A, A + (Max[x(H'), x(D')] - x(A), 0)]) → k'
  39. Midpoint(k) → L
  40. Midpoint(k') → N
  41. Midpoint(i) → O
  42. Midpoint(i'_2) → P
  43. Vector(L, N) → u
  44. Vector(N, L) → v
  45. Vector(O, P) → w
  46. Vector(P, O) → z
  47. Midpoint(O, P) → Q
  48. Midpoint(L, N) → R
  49. Intersect(OrthogonalLine[G_1, b], e) → I_1
  50. Intersect(OrthogonalLine[H_1, d], e) → J_1
  51. Intersect(OrthogonalLine[H_2, d], e) → J_2
  52. Segment(A, H) → AH
  53. Segment(H, D) → HD
  54. Segment(A, B) → AB
  55. Segment(B, F) → BF
  56. Segment(D, E) → DE
  57. Segment(E, C) → EC
  58. Segment(F, G) → FG
  59. Segment(G, C) → GC
  60. Segment(F, I) → FI
  61. Segment(I, J) → IJ
  62. Segment(J, E) → JE
  63. Midpoint(HD) → K
  64. Distance(D, H) → DH
  65. Midpoint(DE) → S
  66. Midpoint(EC) → T
  67. Midpoint(GC) → U
  68. Midpoint(FG) → V
  69. Midpoint(BF) → W
  70. Midpoint(AH) → Z
  71. Midpoint(AB) → A_1
  72. Midpoint(HJ) → B_1
  73. Midpoint(FI) → C_1
  74. Midpoint(IJ) → D_1
  75. Midpoint(JE) → E_1
  76. Midpoint(GI) → K_1
  77. Intersect(Circle[F, Distance[E, J]], e) → I_2,
  78. Intersect(Circle[E, Distance[F, I]], e) → J_3,

AI 绘图提示语参考

绘制一个矩形,将其分割并重排为一个面积相等的正方形。在矩形内部,从一条边上取一点,向对边作一条斜线段,再从另一顶点向该斜线段作垂线,形成切割线。将切割后的部分绕特定顶点旋转,并将另一部分沿向量平移,使它们拼合成一个正方形。图中需显示原始矩形、切割线、旋转后的多边形、平移后的多边形,以及表示平移和旋转方向的箭头。同时标注出各关键交点,并画出辅助圆和垂线以展示构造过程。
以上提示语为根据原始绘图命令整理而来,仅供参考。