部分整体矩形
几何画板及绘图内容加载中,请稍等……
①本范例演示了部分与整体关系的矩形分割与比较;②涉及核心数学概念包括解析几何、参数方程、导数及几何变换;③构造要点运用了Segment, Sequence, Point, Intersect, Polygon, If, Midpoint, OrthogonalLine, Textfield等命令及对象;④适合高中数学教学,用于理解函数、几何作图与参数方程的应用。
GeoGebra 命令及参数
Segment(A, B) → cSequence(Point[{((x(B) - x(A)) / 8 * i) + x(A), ((y(B) - y(A)) / 9 * i) + y(A)}], i, 0, 8, 1) → list1Point(list1) → bound1Point(list1) → bound2Intersect(xAxis, yAxis) → CPoint(xAxis) → DPolygon(C, D, E, F) → poly1, c_1, d, e, f_1If(x(bound1) ≟ x(Element[list1, 1]), 10, If[x(bound1) ≟ x(Element[list1, 2]), 20, If[x(bound1) ≟ x(Element[list1, 3]), 50, If[x(bound1) ≟ x(Element[list1, 4]), 100, If[x(bound1) ≟ x(Element[list1, 5]), 200, If[x(bound1) ≟ x(Element[list1, 6]), 500, If[x(bound1) ≟ x(Element[list1, 7]), 1000, If[x(bound1) ≟ x(Element[list1, 8]), 5000, 10000]]]]]]]) → B1If(x(bound2) ≟ x(Element[list1, 1]), 10, If[x(bound2) ≟ x(Element[list1, 2]), 20, If[x(bound2) ≟ x(Element[list1, 3]), 50, If[x(bound2) ≟ x(Element[list1, 4]), 100, If[x(bound2) ≟ x(Element[list1, 5]), 200, If[x(bound2) ≟ x(Element[list1, 6]), 500, If[x(bound2) ≟ x(Element[list1, 7]), 1000, If[x(bound2) ≟ x(Element[list1, 8]), 5000, 10000]]]]]]]) → B2Midpoint(C, F) → GMidpoint(E, D) → HPoint(Segment[G, H]) → IOrthogonalLine(I, e) → hIntersect(h, e) → JIntersect(h, c_1) → KPolygon(F, J, K, C) → poly2, f_2, j, k, c_2Midpoint(I, G) → textpointPoint(yAxis) → LPoint(yAxis) → MPolygon(L, M, N, O) → poly3, l, m, n_2, oPoint(yAxis) → PPoint(yAxis) → QPoint(yAxis) → USegment(P, Q) → iSegment(U, T) → pSegment(R, S) → qPolygon(L, (answerx, (-2)), (answerx, (-4)), M) → poly4, l_1, r, s, m_1Midpoint(Midpoint[L, M], (answerx, (-3))) → textpoint2Textfield(inTxt) → InputBox1Textfield(inTxt_3) → InputBox2