制作相似三角形

制作相似三角形
几何画板及绘图内容加载中,请稍等……
2019-04-07 22:15
这个范例演示了如何通过变换生成相似三角形。核心数学概念包括相似三角形的性质和相似变换。通过使用GeoGebra命令如Intersect、Polygon、Sequence等,可以动态地展示相似三角形的构造过程。适合初中及以上学生学习相似三角形的相关知识。

GeoGebra 命令及参数

  1. Intersect(Line[A, Rotate[A + (1, 0), 45°, A]], Line[B, Rotate[B - (1, 0), (-(23°)), B]]) → C
  2. Polygon(A, B, C) → t1, c, a, b
  3. Sequence(P + ((i * c), 0), i, 0.2, 3, 0.05) → l1
  4. Angle(C, B, A) → β
  5. Point(l1) → Q
  6. Angle(B, A, C) → α
  7. Point(Ray[Rotate[P + (1, 0), ε, P], Rotate[P + (2, 0), ε, P]]) → R1
  8. Intersect(Ray[P, Rotate[P + (1, 0), ε, P]], Ray[Q, Rotate[Q - (1, 0), (-ζ), Q]]) → R_1
  9. Point(Ray[Rotate[Q - (1, 0), (-ζ), Q], Rotate[Q - (2, 0), (-ζ), Q]]) → R2
  10. If(Distance[R1, R_1] < δ, true, false) → close11
  11. If(Distance[R2, R_1] < δ, true, false) → close21
  12. Segment(P, Q) → r
  13. Polygon(P, Q, R_1) → t2, r_1, p_1, q_1
  14. Angle(A, C, B) → γ
  15. DynamicCoordinates(R1, If[Distance[R1, R_1] < δ, x(R_1), x(R1)], If[Distance[R1, R_1] < δ, y(R_1), y(R1)]) → R
  16. DynamicCoordinates(R2, If[Distance[R2, R_1] < δ, x(R_1), x(R2)], If[Distance[R2, R_1] < δ, y(R_1), y(R2)]) → R'
  17. Segment(P, R) → q
  18. Segment(Q, R') → p
  19. Angle(Q, P, R) → η
  20. Angle(R', Q, P) → θ
  21. If(α ≟ ε ∧ β ≟ ζ, true, false) → AAA
  22. Angle(P, R, Q) → ι
  23. Textfield(angleP) → InputBox1
  24. Textfield(angleQ) → InputBox2