平方根
几何画板及绘图内容加载中,请稍等……
这个范例演示了平方根的概念。它涉及的核心数学概念包括根号和实数。通过使用GeoGebra命令如Sequence、Element、Textfield等,用户可以探索平方根的性质。适合初中及以上学生学习平方根的相关知识。
GeoGebra 命令及参数
Sequence(Random[1, 10], i, 1, 10) → randomNumbers, {5, 10, 4, 7, 2, 3, 6, 3, 1, 6}Element(randomNumbers, Mod[questionCount, Length[randomNumbers]] + 1) → randomNumberTextfield(input) → inputBoxJoin({Sequence[Segment[Corner[4] + (RasterPixMat * ((k * RasterStepXY), 0)), Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY))], k, 0, RasterMaxX / RasterStepXY], Sequence[Segment[Corner[4] + (RasterPixMat * (0, (k * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], k, 0, RasterMaxY / RasterStepXY]}) → RasterStreckenJoin({Sequence[Text[UnicodeToLetter[65 + k], Midpoint[Corner[4] + (RasterPixMat * ((k * RasterStepXY), RasterMaxY)), Corner[4] + (RasterPixMat * (((k + 1) * RasterStepXY), RasterMaxY))], false, true, 0, -1], k, 0, RasterMaxX / RasterStepXY - 1], Sequence[Text[("" * k), Midpoint[Corner[4] + (RasterPixMat * (RasterMaxX, ((k - 1) * RasterStepXY))), Corner[4] + (RasterPixMat * (RasterMaxX, (k * RasterStepXY)))], false, true, 1, 0], k, 1, RasterMaxY / RasterStepXY]}) → RasterBeschriftungSequence(Sequence[Corner[4] + (RasterPixMat * ((k * RasterStepXY), (m * RasterStepXY))), k, 0, RasterMaxX / RasterStepXY], m, 0, RasterMaxY / RasterStepXY) → RasterPunkteSelectedIndex(dropdown051) → index051Sequence(InputQList(k) ≟ SolutionQList(k), k, 1, Length[InputQList]) → CorrectQListSequence(Sequence[Polygon[PosQ01 - ((2.5 * disQ), (2.5 * disQ)) + ((k * (dimQ + disQ)), (m * (dimQ + disQ))) + (dimQ * {(0, 0), (0, 1), (1, 1), (1, 0)})], k, 0, 5], m, 0, 5) → polyQ06If(step ≟ 9, (5.1, 4.75), (8.6, 5.85)) → Pos1Angle(MP1 + (1, 0), MP1, Pos1) → angle11Angle(MP1 + (1, 0), MP1, Pos2) → angle12CircleArc(MP1, MP1 + (Distance[MP1, Pos1] * (cos(angle12 + disAngle), sin(angle12 + disAngle))), MP1 + (Distance[MP1, Pos1] * (cos(angle11 - disAngle), sin(angle11 - disAngle)))) → arc01Mirror(arc01, Spiegelgerade) → arc02Text((("\textsf{\bold{\Large{" * If[step < 7, "6", step ≟ 7, "3", step ≟ 8, "1", "x\vphantom{x²}"]) * "}}}"), Pos1 + (0, If[step > 8, 0.15, 0]), false, true, 0, 0) → txt1Text((("\textsf{\bold{\Large{" * If[step < 7, "36", step ≟ 7, "9", step ≟ 8, "1", "x²"]) * "}}}"), Pos2 + (0, If[step > 8, 0.15, 0]), false, true, 0, 0) → txt2Segment(Point[arc01, 0], Point[arc01, 0] + (0.001 * UnitVector[Tangent[Point[arc01, 0], arc01]])) → arrow01Segment(Point[arc02, 1], Point[arc02, 1] + (0.001 * UnitVector[Tangent[Point[arc02, 1], arc02]])) → arrow02Translate(arc01, Vector[Pos1, Pos3]) → arc03Translate(arc02, Vector[Pos1, Pos3]) → arc04Translate(arrow01, Vector[Pos1, Pos3]) → arrow03Translate(arrow02, Vector[Pos1, Pos3]) → arrow04Translate(MP1, Vector[Pos1, Pos3]) → MP3Translate(MP2, Vector[Pos1, Pos3]) → MP4Text((("\textsf{\bold{\Large{" * If[step < 7, "6", step ≟ 7, "3", step ≟ 8, "1", "x\vphantom{x²}"]) * "}}}"), Pos3 + (0, If[step > 8, 0.15, 0]), false, true, 0, 0) → txt3Text((("\textsf{\bold{\Large{" * If[step < 7, "36", step ≟ 7, "9", step ≟ 8, "1", "x²"]) * "}}}"), Pos4 + (0, If[step > 8, 0.15, 0]), false, true, 0, 0) → txt4Text("\bold{\textsf{Quadrieren}}", MP4 + (0, 0.15), false, true, 0, 0) → txt7Text("\bold{\textsf{Quadratwurzelziehen}}", MP3 + (0, -0.15), false, true, 0, 0) → txt8Textfield(input021) → InputBox021Textfield(input051) → InputBox051Textfield(input052) → InputBox052Textfield(input061) → InputBox061Textfield(input062) → InputBox062Textfield(input071) → InputBox071Textfield(input072) → InputBox072Textfield(input081) → InputBox081Textfield(input082) → InputBox082Sequence(Sequence[Polygon[PosQ02 - ((2.5 * disQ), (2.5 * disQ)) + ((k * (dimQ + disQ)), (m * (dimQ + disQ))) + (dimQ * {(0, 0), (0, 1), (1, 1), (1, 0)})], k, 0, 2], m, 0, 2) → polyQ07Sequence(Sequence[Polygon[PosQ03 - ((2.5 * disQ), (2.5 * disQ)) + ((k * (dimQ + disQ)), (m * (dimQ + disQ))) + (dimQ * {(0, 0), (0, 1), (1, 1), (1, 0)})], k, 0, 0], m, 0, 0) → polyQ08Textfield(inputQ022) → InputBoxQ022Textfield(inputQ031) → InputBoxQ031Textfield(inputQ032) → InputBoxQ032Textfield(inputQ041) → InputBoxQ041Textfield(inputQ042) → InputBoxQ042Textfield(inputQ051) → InputBoxQ051Textfield(inputQ052) → InputBoxQ052Textfield(inputQ061) → InputBoxQ061Textfield(inputQ062) → InputBoxQ062Textfield(inputQ071) → InputBoxQ071Textfield(inputQ072) → InputBoxQ072Textfield(inputQ081) → InputBoxQ081Textfield(inputQ082) → InputBoxQ082Textfield(inputQ091) → InputBoxQ091Textfield(inputQ092) → InputBoxQ092Textfield(inputQ101) → InputBoxQ101Textfield(inputQ102) → InputBoxQ102Textfield(inputQ111) → InputBoxQ111Textfield(inputQ112) → InputBoxQ112Textfield(inputQ121) → InputBoxQ121Textfield(inputQ122) → InputBoxQ122Textfield(inputQ131) → InputBoxQ131Textfield(inputQ132) → InputBoxQ132Textfield(inputQ141) → InputBoxQ141Textfield(inputQ142) → InputBoxQ142Textfield(inputQ151) → InputBoxQ151Textfield(inputQ152) → InputBoxQ152If(step ≟ 2, correct021, step ≟ 3, anim03 ≟ Length[txtListAnim03], true, step ≟ 5, correct051 ∧ correct052 ∧ correct053 ∧ correctdd051, step ≟ 6, correct061 ∧ correct062, step ≟ 7, correct071 ∧ correct072, step ≟ 8, correct081 ∧ correct082) → clickableBtnNextText("\textsf{\large{\bold{\textcolor{black}{A = 36 cm²}}}}", PosQ01 + (dimQ * (3, 3)), false, true, 0, 0) → CapQ01Segment(Vertex[polyQ01(1), 3] + (disSeg, 0), Vertex[polyQ01(1), 4] + (disSeg, 0)) → seg011Segment(Vertex[polyQ01(1), 1] + (0, (-disSeg)), Vertex[polyQ01(1), 4] + (0, (-disSeg))) → seg012Textfield(input053) → InputBox053Text("\textsf{\bold{\textcolor{black}{A = 9 cm²}}}", PosQ02 + (dimQ * (1.5, 1.5)), false, true, 0, 0) → CapQ02Text("\textsf{\bold{\textcolor{black}{A = 1 cm²}}}", PosQ03 + (dimQ * (0.5, 0.5)) + (-0.05, 0) + (0, dimQ), false, true, 0, 0) → CapQ03Text("\textsf{Quadratwurzelziehen}", MP1 - (0, 0.85), false, true, 0, 0) → CapOperation2Text("\textsf{Quadrieren}", MP2 + (0, 0.85), false, true, 0, 0) → CapOperation1Segment(Vertex[polyQ06(1, 6), 4] + (disSeg, 0), Vertex[polyQ06(6, 6), 3] + (disSeg, 0)) → seg061Segment(Vertex[polyQ06(1, 1), 1] + (0, (-disSeg)), Vertex[polyQ06(1, 6), 4] + (0, (-disSeg))) → seg062Segment(Vertex[polyQ07(1, 3), 4] + (disSeg, 0), Vertex[polyQ07(3, 3), 3] + (disSeg, 0)) → seg071Segment(Vertex[polyQ07(1, 1), 1] + (0, (-disSeg)), Vertex[polyQ07(1, 3), 4] + (0, (-disSeg))) → seg072Segment(Vertex[polyQ08(1, 1), 4] + (disSeg, 0), Vertex[polyQ08(1, 1), 3] + (disSeg, 0)) → seg081Segment(Vertex[polyQ08(1, 1), 1] + (0, (-disSeg)), Vertex[polyQ08(1, 1), 4] + (0, (-disSeg))) → seg082Text("\bold{\textsf{\begin{array}{c}Quadrieren\\x \cdot x = x²\end{array}}}", MP2 + (0, -0.5), false, true, 0, 1) → txt5Text("\bold{\textsf{\begin{array}{c}\sqrt{x²} = x\\Quadratwurzelziehen\vphantom{x²}\end{array}}}", MP1 + (0, 0.5), false, true, 0, -1) → txt6If(step ≟ 2, Corner[txt021, 1] + (0.5, -0.25), step ≟ 5, Corner[txt051, 1] + (4, -0.25), 6 ≤ step ≤ 8, Pos1 + (0.85, 0.25), step ≟ 10, Corner[txt102, 1] + (3.5, 0), (1, 1)) → PosShowSolution