四象限中的三角比
几何画板及绘图内容加载中,请稍等……
本范例展示了四象限中三角比的变化规律。涉及的核心数学概念包括三角函数、角度和象限。通过使用GeoGebra命令如Sequence、Zip、Point等,可以动态地展示角度和三角比的关系。适合高中数学教学和学习。
GeoGebra 命令及参数
Sequence(((3 * i))°, i, 1, 120) → angleMeasuresZip(((5 * cos(A)), (5 * sin(A))), A, angleMeasures) → pointListPoint(pointList) → PIndexOf(P, pointList) → pIndxUnicodeToLetter(10007) → xmarkUnicodeToLetter(10003) → cmarkAngle(Vector[(12, 0)], Vector[P]) → angleDisplayLaTeX("Move point \(P\) and observe the values of the trigonometric ratios.") → SpecInstrucSegment(P, (x(P), 0)) → VerticalLineIf(x(P) < 0, "-", "") → cosSignVector((0, 0), (qWidth, 0)) → hAxisRotate(hAxis, π, (0, 0)) → hAxis2Rotate(hAxis, π / 2, (0, 0)) → vAxisRotate(hAxis, (3 * π / 2), (0, 0)) → vAxis2Segment((0, 0), P) → terminalArmZip(Rotate[A, Element[angleMeasures, pIndx], (0, 0)], A, {(1.8, -0.2), (2, 0), (2.2, -0.2)}) → chevronPointsSequence(Segment[Element[chevronPoints, i], Element[chevronPoints, i + 1]], i, 1, 2) → chevronCurveCartesian((2 * cos(((2 * π) * t))), (2 * sin(((2 * π) * t))), t, 0, Element[angleMeasures, pIndx] / ((2 * π))) → angleCurveIf((y(P) / 5 * 100) ≟ (round(y(P) / 5, 2) * 100), " = ", " \approx ") → sinEqualityLaTeX((((("\text{\sin(\theta) = \dfrac{\(y\)}{\(r\)} = \dfrac{\(" * y(P)) * "\)}{\(5\)}}") * sinEquality) * sinFinalFmt)) → sinStrIf((x(P) / 5 * 100) ≟ (round(x(P) / 5, 2) * 100), " = ", " \approx ") → cosEqualityLaTeX((((("\text{\cos(\theta) = \dfrac{\(x\)}{\(r\)} = \dfrac{\(" * x(P)) * "\)}{\(5\)}}") * cosEquality) * cosFinalFmt)) → cosStrIf(x(P) ≟ 0, "", If[(y(P) / x(P) * 100) ≟ (round(y(P) / x(P), 2) * 100), " = ", " \approx "]) → tanEqualityIf(x(P) ≟ 0, "\text{\hphantom{222}undefined}", (("\(" * y(P) / x(P)) * "\)")) → tanFinalFmtLaTeX((((((("\text{\tan(\theta) = \dfrac{\(y\)}{\(x\)} = \dfrac{\(" * y(P)) * "\)}{\(") * x(P)) * "\)}}") * tanEquality) * tanFinalFmt)) → tanStrTableText({{thetaStr, radiusStr, sinStr, cosStr, tanStr}}, "vl") → allDataPolygon({(0, 0), (0, 0.5), (0.5, 0.5), (0.5, 0)}) → angleBoxTemplateTranslate(angleBoxTemplate, (If[x(P) > 0, x(P) - 0.5, x(P)], If[y(P) > 0, 0, -0.5])) → angleBox