动画演示直角三角形与内切圆关系
几何画板及绘图内容加载中,请稍等……
①本范例通过动画演示直角三角形内切圆的动态变化与性质;②涉及核心数学概念包括内切圆、直角三角形、二次方程、函数、几何变换等;③构造过程中运用了Ray, Point, Segment, Line, Circle, Rotate, Dilate等GeoGebra命令;④适合高中数学教学,用于理解几何变换与函数图像的关联。
GeoGebra 命令及参数
Ray(A, B) → gPoint(g) → FRay(A, F) → hPoint(h) → GSegment(A, G) → kLine(A, B) → aOrthogonalLine(A, a) → dPoint(d) → ERay(A, E) → iPoint(i) → HLine(A, H) → mSegment(A, H) → jCircle(A, Min[(0.15 * j), (0.15 * k)]) → pIntersect(p, m) → O, PIntersect(p, a) → M, NOrthogonalLine(B, a) → ePoint(d) → CRay(A, C) → cRay(A, E) → bIntersect(p, a, 2) → IIntersect(p, i, 1) → JIntersect(p, a, 1) → KPolygon(A, G, H) → poly1, h_1, a_1, g_1CircleSector(A, N, P) → qRotate(q, If[0 < f ≤ 1, (f * π / 2), π / 2], A) → q'Rotate(G, 45°, A) → G'Angle(G, A, G') → αAngle(H, G, A) → βRotate(H, β / 2, G) → H'Angle(H, G, H') → γRay(G, H') → lRay(A, G') → nIntersect(l, n) → DLine(H, G) → rIntersect(r, n) → LIntersect(l, m) → QDilate(A, If[1 < f ≤ 2, 2 - f, 0], L) → A'Segment(A, A') → sIntersect(p, n) → R,Circle(G, (0.15 * Distance[A, G])) → tIntersect(t, r) → S, TIntersect(t, l) → U,CircleSector(G, S, U) → d_1CircleSector(A, R, P) → c_1Dilate(G, If[2 < f ≤ 3, 3 - f, 0], D) → G'_1Segment(G, G'_1) → f_1Rotate(c_1, If[3 < f ≤ 4, ((-(f - 3)) * π / 4), ((-π)) / 4], A) → e_1Rotate(d_1, If[4 < f ≤ 5, ((f - 4) * γ), γ], G) → k_1OrthogonalLine(D, a) → i_1Intersect(a, i_1) → VOrthogonalLine(D, r) → j_1OrthogonalLine(D, m) → l_1Intersect(j_1, r) → WIntersect(l_1, m) → ZAngle(G, V, D) → δDilate(D, If[5 < f ≤ 6, 6 - f, 0], V) → D'Segment(D, D') → m_1Angle(V, D, W) → εAngle(W, D, Z) → ζAngle(Z, D, V) → ηRotate(V, If[6 < f ≤ 7, ((f - 6) * ε), ε], D) → V'CircleArc(D, V, V') → p_1Rotate(W, If[7 < f ≤ 8, ((f - 7) * ζ), ζ], D) → W'CircleArc(D, W, W') → q_1Rotate(Z, If[8 < f ≤ 9, ((f - 8) * π / 2), π / 2], D) → Z'CircleArc(D, Z, Z') → r_1Circle(D, V) → s_1Line(Z, W) → n_1Intersect(l, n_1) → A_1Dilate(Z, If[9 < f ≤ 10, 10 - f, 0], W) → Z'_1Segment(Z, Z'_1) → t_1Dilate(D, If[10 < f ≤ 11, 11 - f, 0], A_1) → D'_1Segment(D, D'_1) → b_1Line(A, f_1) → f_2Point(f_2) → B_1Angle(B_1, A, G) → θDilate(A, If[11 < f ≤ 12, 12 - f, 0], A_1) → A'_1Vector(A, A'_1) → uTranslate(e_1, u) → c_2Rotate(c_2, If[12 < f ≤ 13, ((-(f - 12)) * θ), (-θ)], A_1) → d_2Segment(A, H) → g_2Segment(H, G) → h_2