比较随机商

比较随机商
几何画板及绘图内容加载中,请稍等……
2015-11-07 08:12
①本范例演示如何通过 GeoGebra 比较随机生成的商的大小关系;②涉及的核心数学概念包括除法运算、数列、比较大小、中位数等;③作图要点——从下方『构造摘要』提炼用到了 Sequence(数列生成)、Intersect(交点计算)、Point(点创建)、Segment(线段绘制)、Vector(向量表示)、If(条件判断)、Remove(对象移除等 GeoGebra 命令/对象;④适合高中数学教学,用于理解概率统计中的随机变量分布与比较。

GeoGebra 命令及参数

  1. Sequence(Random[2, 9], i, 1, n) → factor1
  2. Sequence((Element[factor1, i] * Random[2, 9]), i, 1, n) → product
  3. Sequence(Element[product, i] / Element[factor1, i], i, 1, n) → answer
  4. Intersect(xAxis, yAxis) → A
  5. Point(xAxis) → B
  6. Segment(A, B) → a
  7. Sequence(Polygon[A + ((20 / (n - 1) * i), 0), A + (4, 0) + ((20 / (n - 1) * i), 0), 4], i, 0, n - 1) → rects
  8. Vector(C, D) → u
  9. If(IsInRegion[ONE, Element[rects, 1]], 1, (IsInRegion[ONE, Element[rects, 2]] * 2) + (IsInRegion[ONE, Element[rects, 3]] * 3) + (IsInRegion[ONE, Element[rects, 4]] * 4) + (IsInRegion[ONE, Element[rects, 5]] * 5)) → order1
  10. If(IsInRegion[TWO, Element[rects, 1]], 1, (IsInRegion[TWO, Element[rects, 2]] * 2) + (IsInRegion[TWO, Element[rects, 3]] * 3) + (IsInRegion[TWO, Element[rects, 4]] * 4) + (IsInRegion[TWO, Element[rects, 5]] * 5)) → order2
  11. If(IsInRegion[THREE, Element[rects, 1]], 1, (IsInRegion[THREE, Element[rects, 2]] * 2) + (IsInRegion[THREE, Element[rects, 3]] * 3) + (IsInRegion[THREE, Element[rects, 4]] * 4) + (IsInRegion[THREE, Element[rects, 5]] * 5)) → order3
  12. If(IsInRegion[FOUR, Element[rects, 1]], 1, (IsInRegion[FOUR, Element[rects, 2]] * 2) + (IsInRegion[FOUR, Element[rects, 3]] * 3) + (IsInRegion[FOUR, Element[rects, 4]] * 4) + (IsInRegion[FOUR, Element[rects, 5]] * 5)) → order4
  13. If(IsInRegion[FIVE, Element[rects, 1]], 1, (IsInRegion[FIVE, Element[rects, 2]] * 2) + (IsInRegion[FIVE, Element[rects, 3]] * 3) + (IsInRegion[FIVE, Element[rects, 4]] * 4) + (IsInRegion[FIVE, Element[rects, 5]] * 5)) → order5
  14. Remove(First[{order1, order2, order3, order4, order5}, n], {0, 0, 0, 0, 0}) → PlacedAnswers