积极 AI Logo 积极 AI

分数乘法演示 by John Ulbright

分数乘法演示 by John Ulbright
几何画板及绘图内容加载中，请稍等……
2017-01-20 23:56
函数微积分几何作图
①本范例演示了分数乘法的几何意义与计算过程；②涉及核心数学概念包括分数运算、几何图形（多边形、函数图像）、微积分中的上和下和（Riemann和）；③作图要点使用了GeoGebra命令如Point, Polygon, Textfield, IndexOf, Take, Sequence, RemoveUndefined, Intersection等，对象包括mover, f2Point, f1Point, f1, f1poly等；④适合高中及以上学生学习分数乘法、微积分初步以及几何直观。

GeoGebra 命令及参数

  1. Point({1 - mover, 0}) → f2Point
  2. Point({-1 + mover, 0}) → f1Point
  3. Polygon(f1Point, f1Point + (f1, 0), f1Point + (f1, 1), f1Point + (0, 1)) → f1poly, f1point, n, p, q
  4. Polygon(f2Point, E, G, H) → poly3, f2point, e, g_1, h_1
  5. Textfield(f1Text) → InputBox1
  6. Textfield(f2Text) → InputBox2
  7. IndexOf(47, TextToUnicode[f1Text]) → slash1
  8. IndexOf(47, TextToUnicode[f2Text]) → slash2
  9. Take(f1Text, slash1 + 1) → D1Text
  10. Polygon(f1Point, f1Point + (1, 0), 4) → poly1, f, g, h, i, A, B
  11. Polygon(f2Point, f2Point + (1, 0), 4) → poly2, j, k, l, m, C, D
  12. Take(f2Text, slash2 + 1) → D2Text
  13. Sequence(Segment[f1Point + (i / D1, 0), f1Point + (i / D1, 1)], i, 1, D1 - 1) → f1Bars
  14. Sequence(Segment[f2Point + (0, i / D2), f2Point + (1, i / D2)], i, 1, D2 - 1) → f2Bars
  15. Polygon(f2Point, f2Point + (0, f2), f2Point + (1, f2), f2Point + (1, 0)) → f2poly, r, s, t, a
  16. RemoveUndefined(Sequence[If[pN / i ≟ floor(pN / i), i], i, 1, pN]) → Nfactors
  17. RemoveUndefined(Sequence[If[pD / i ≟ floor(pD / i), i], i, 1, pD]) → Dfactors
  18. Intersection(Nfactors, Dfactors) → factors