两弦所成角(动态演示)
几何画板及绘图内容加载中,请稍等……
该范例通过GeoGebra动态几何环境,直观演示了圆内两条相交弦所形成夹角(即两弦所成角)的几何性质。核心数学概念是圆周角定理的推论:当两条弦在圆内相交时,所形成的夹角等于该角所夹两条弧的弧度之和的一半。作图要点包括:使用Circle命令构造圆,用Point和Segment命令确定两条弦的端点与弦,通过Intersect命令找到交点,利用Angle命令测量夹角,并借助Rotate、Dilate、Translate等变换命令以及滑块(Slider)实现动态调整,使图形可交互变化。该范例适合中学几何教学,帮助学生理解圆内角与弧的关系,也可用于数学实验或探究活动,通过拖动点观察角度变化规律。
GeoGebra 命令及参数
Circle(A, B) → cSegment(A, B) → aPoint(c) → CPoint(c) → DSegment(C, D) → dPoint(d) → ECircleArc(A, C, D) → ePoint(e) → FCircleArc(A, D, C) → fRay(F, E) → bIntersect(f, b, 1) → GSegment(F, E) → gSegment(E, G) → hSegment(C, E) → iSegment(E, D) → jMin(list1) → kCircle(E, (0.4 * k)) → pSegment(A, G) → lSegment(A, C) → mSegment(A, F) → nSegment(A, D) → qCircle(A, (0.4 * k)) → rIntersect(r, l, 1) → HIntersect(r, m, 1) → IIntersect(p, h, 1) → JIntersect(p, i, 1) → KIntersect(p, g, 1) → LIntersect(p, j, 1) → MIntersect(r, n, 1) → NIntersect(r, q, 1) → OAngle(G, A, C) → αAngle(F, A, D) → βRotate(G, (-(α / 2)), A) → G'Rotate(G, α / 2, A) → G'_1Angle(G, A, G'_1) → γRotate(F, β / 2, A) → F'Angle(F, A, F') → δSegment(A, F') → sSegment(A, G'_1) → tIntersect(r, t, 1) → PIntersect(r, s, 1) → QDilate(A, If[0 < o ≤ 1, 1 - o, 0], G) → A'Dilate(A, If[0 < o ≤ 1, 1 - o, 0], C) → A'_1Dilate(A, If[0 < o ≤ 1, 1 - o, 0], F) → A'_2Dilate(A, If[0 < o ≤ 1, 1 - o, 0], D) → A'_3Segment(A, A') → a_1Segment(A, A'_1) → b_1Segment(A, A'_2) → c_1Segment(A, A'_3) → d_1Dilate(A, If[1 < o ≤ 2, 2 - o, 0], G'_1) → A'_4Dilate(A, If[1 < o ≤ 2, 2 - o, 0], F') → A'_5Segment(A, A'_4) → e_1Segment(A, A'_5) → f_1CircleSector(A, H, P) → g_1CircleSector(A, N, Q) → h_1Rotate(g_1, If[2 < o ≤ 3, ((o - 2) * γ), γ], A) → k_1Rotate(h_1, If[3 < o ≤ 4, ((o - 3) * δ), δ], A) → q_1Dilate(A, If[4 < o ≤ 5, 5 - o, 0], E) → A'_6Vector(A, A'_6) → uTranslate(k_1, u) → s_1Translate(I, u) → I'Angle(I', E, K) → εRotate(s_1, If[5 < o ≤ 6, ((o - 5) * ε), ε], E) → t_1Dilate(A, If[6 < o ≤ 7, 7 - o, 0], E) → A'_7Vector(A, A'_7) → vTranslate(q_1, v) → c_2Angle(J, E, K) → ζTranslate(P, v) → P'Rotate(P', ε, E) → P''Translate(O, v) → O'Angle(O', E, P'') → ηRotate(c_2, If[7 < o ≤ 8, ((o - 7) * η), η], E) → d_2CircleArc(A, F, D) → e_2CircleArc(A, G, C) → f_2Intersect(p, h, 1) → RCircleSector(E, R, K) → g_2