动态几何图形演示 by Tim Brzezinski (9)
几何画板及绘图内容加载中,请稍等……
这个范例动态演示了由 Antonio Gutierrez 提出的几何问题,通过可调节的图形展示几何关系。涉及的核心数学概念包括三角函数、有理数、全等、交点、加法等。作图要点运用了 Rotate(旋转)、Angle(角度)、Ray(射线)、Point(点)、Intersect(交点)、Segment(线段)、Polygon(多边形)、OrthogonalLine(垂线)、Circle(圆)、CircleSector(圆扇形)、Semicircle(半圆)、Midpoint(中点)、Vector(向量)、Translate(平移)、Line(直线)、Dilate(缩放)、CircleArc(圆弧)等 GeoGebra 命令和对象。适合高中及以上学段,用于几何作图和概念理解。
GeoGebra 命令及参数
Rotate(A, atan(1 / 3), B) → A'Angle(A, B, A') → βRay(B, A) → fRay(B, A') → gPoint(g) → CRotate(B, π / 2 + β, C) → B'Angle(B, C, B') → γRay(C, B') → hIntersect(h, f) → DSegment(B, C) → iSegment(C, D) → jPolygon(B, D, C) → t1, c, b, dOrthogonalLine(B, f) → kPoint(k) → EAngle(E, B, D) → αRotate(B, 90°, C) → B'_1Ray(C, B'_1) → lIntersect(f, l) → FCircle(B, (0.5 * j)) → eIntersect(e, k, 1) → GRotate(G, If[0 < m ≤ 1, (m * (π / 2 + β)), π / 2 + β], B) → G'CircleSector(B, G, G') → pSemicircle(C, B) → qMidpoint(i) → HRotate(B, If[2 < m ≤ 3, ((m - 2) * π), π], H) → B'_2Vector(B, B'_2) → uTranslate(p, u) → p'Line(C, k) → nPoint(n) → IAngle(B, C, I) → δRotate(p', If[2 < m ≤ 3, ((-(m - 2)) * δ), (-δ)], B'_2) → p''Angle(C, D, B) → εRotate(C, If[4 < m ≤ 5, ((m - 4) * ε), ε], D) → C'Rotate(D, If[4 < m ≤ 5, ((m - 4) * ε), ε], D) → D'Segment(C', D') → j'Rotate(C', If[5 < m ≤ 6, ((m - 5) * π), π], C') → C''Rotate(D', If[5 < m ≤ 6, ((m - 5) * π), π], C') → D''Segment(C'', D'') → j''Rotate(C'', If[6 < m ≤ 7, ((m - 6) * π), π], D'') → C'''Rotate(D'', If[6 < m ≤ 7, ((m - 6) * π), π], D'') → D'''Segment(C''', D''') → j'''Intersect(e, k, 1) → JRay(C, B) → rIntersect(e, r, 2) → KRotate(C''', If[8 < m ≤ 9, ((-(m - 8)) * π / 2), ((-π)) / 2], B) → LRotate(D''', If[8 < m ≤ 9, ((-(m - 8)) * π / 2), ((-π)) / 2], B) → MSegment(L, M) → sDilate(M, If[9 < m ≤ 10, 10 - m, 0], D) → M'Segment(M, M') → tPolygon(B, M, D) → t2, d_1, b_1, m_1Circle(D, (0.5 * j)) → c_1Intersect(c_1, j') → N,Rotate(N, If[11 < m ≤ 12, ((m - 11) * β), β], D) → N'CircleSector(D, N, N') → e_1Intersect(c_1, t) → O,Circle(B, (0.4 * i)) → f_1Intersect(f_1, i) → P,Dilate(D, If[13 < m ≤ 14, 14 - m, 0], P) → D'_1Vector(D, D'_1) → vTranslate(e_1, v) → g_1Rotate(g_1, If[13 < m ≤ 14, ((m - 13) * π), π], D'_1) → h_1Dilate(P, If[14 < m ≤ 15, 15 - m, 0], B) → P'Vector(P, P') → wTranslate(h_1, w) → k_1CircleArc(D, N, O) → p_1