同底数幂除法法则
几何画板及绘图内容加载中,请稍等……
这个范例演示了同底数幂除法的法则。核心数学概念包括指数法则。通过使用GeoGebra命令如Text、If、Sequence等,可以动态展示指数法则的应用。适合初中及以上学生学习指数运算。
GeoGebra 命令及参数
Text("y") → text4Text("y") → text6Text("x") → text5Text(expX1 + "") → text8Text(expX2 + "") → text9Text(expY1 + "") → text10Text(expY2 + "") → text11Text("________________") → origFracLineIf(color, 255, 0) → factorColor255If(color, 153, 0) → factorColor153Text("x") → text3Text("________________") → fracLineText(abs(expX1 - expX2) + "") → fracXbotYbotExpText(abs(expY1 - expY2) + "") → fracYbotXbotExpText(expY1 - expY2 + "") → fracYtopXbotExpText(abs(expX1 - expX2) + "") → fracXbotYtopExpIf(expX1 - expX2 ≟ 0 ∧ expY1 - expY2 ≟ 0, 1, 0) → zerosText(expX1 - expX2 + "") → fracXtopYtopExpText(abs(expY1 - expY2) + "") → fracYbotXtopExpText(expX1 - expX2 + "") → fracXtopYbotExpText(expY1 - expY2 + "") → fracYtopXtopExpSequence(Translate[xtop, Vector[(0, 0), (((-0.75) * i), 0)]], i, 0, expX1 - 1) → ExpandXtopSequence(Translate[ytop, Vector[(0, 0), ((0.75 * i), 0)]], i, 0, expY1 - 1) → ExpandYtopSequence(Translate[xtop, Vector[(0, 0), (((-0.75) * i), (-1.2))]], i, 0, expX2 - 1) → ExpandXbotSequence(Translate[ytop, Vector[(0, 0), ((0.75 * i), (-1.2))]], i, 0, expY2 - 1) → ExpandYbotSegment((7.5 - (0.75 * If[expX1 > expX2, expX1, expX2]), (-0.5)), (7.5 + (0.75 * If[expY1 > expY2, expY1, expY2]), (-0.5))) → ExpandDivLineTranslate((6.923609046978582, -1.782455570499752), Vector[(0, 0), (0, -3)]) → ATranslate((6.923609046978582, 0.217544429500248), Vector[(0, 0), (0, -3)]) → BTranslate((7.524258469913336, 0.217544429500248), Vector[(0, 0), (0, -3)]) → CTranslate((7.524258469913336, -1.782455570499752), Vector[(0, 0), (0, -3)]) → DPolygon(A, B, C, D) → ShadeNotePoly, a_1, b_1, c_1, d_1Sequence(Polygon[Translate[(6.923609046978582, -1.782455570499752), Vector[(0, 0), (((-0.73) * i), 0)]], Translate[(6.923609046978582, 0.4), Vector[(0, 0), (((-0.73) * i), 0)]], Translate[(7.524258469913336, 0.4), Vector[(0, 0), (((-0.73) * i), 0)]], Translate[(7.524258469913336, -1.782455570499752), Vector[(0, 0), (((-0.73) * i), 0)]]], i, 0, If[expX1 > expX2, expX2, expX1] - 1) → ExpandXPairsSeqSequence(Polygon[Translate[(6.923609046978582, -1.782455570499752), Vector[(0, 0), ((0.73 * i), 0)]], Translate[(6.923609046978582, 0.4), Vector[(0, 0), ((0.73 * i), 0)]], Translate[(7.524258469913336, 0.4), Vector[(0, 0), ((0.73 * i), 0)]], Translate[(7.524258469913336, -1.782455570499752), Vector[(0, 0), ((0.73 * i), 0)]]], i, 1, If[expY1 > expY2, expY2, expY1]) → ExpandYPairsSeq