积极 AI Logo 积极 AI

求和至100

求和至100
几何画板及绘图内容加载中，请稍等……
2018-07-03 23:36
多边形三角函数几何作图
①本范例演示了如何通过几何图形构造求和至100的数学模型；②涉及的核心数学概念包括加法、分形几何、菱形、对称性、三角函数等；③作图要点提炼自构造摘要，使用了Polygon（多边形）、If（条件判断）、Mod（模运算）、Div（整除）、Sequence（数列）等GeoGebra命令与对象；④适合高中数学教学，用于探索几何与代数的结合，以及对称性与分形图案的生成。

GeoGebra 命令及参数

  1. Polygon((0, 0), (0.9, 0), 4) → poly1
  2. Polygon((2, 0), (2.9, 0), 4) → poly3
  3. Polygon((1, 0), (1.9, 0), 4) → poly2
  4. Polygon((-2, 0), (-1.1, 0), 4) → poly5
  5. Polygon((-1, 0), (-0.1, 0), 4) → poly6
  6. Polygon((0, 1), (0.9, 1), 4) → poly4
  7. Polygon((-5, 0), (-4.1, 0), 4) → poly8
  8. Polygon((-4, 0), (-3.1, 0), 4) → poly9
  9. Polygon((0, 2), (0.9, 2), 4) → poly7
  10. If(IsInRegion[A, poly9], 1, If[IsInRegion[B, poly9], 2, If[IsInRegion[C, poly9], 3, If[IsInRegion[D, poly9], 4, If[IsInRegion[E, poly9], 5, If[IsInRegion[F, poly9], 6, If[IsInRegion[G, poly9], 7, If[IsInRegion[H, poly9], 8, If[IsInRegion[I, poly9], 9, 0]]]]]]]]) → nineSum
  11. If(IsInRegion[A, poly8], 1, If[IsInRegion[B, poly8], 2, If[IsInRegion[C, poly8], 3, If[IsInRegion[D, poly8], 4, If[IsInRegion[E, poly8], 5, If[IsInRegion[F, poly8], 6, If[IsInRegion[G, poly8], 7, If[IsInRegion[H, poly8], 8, If[IsInRegion[I, poly8], 9, 0]]]]]]]]) → eightSum
  12. If(IsInRegion[A, poly6], 1, If[IsInRegion[B, poly6], 2, If[IsInRegion[C, poly6], 3, If[IsInRegion[D, poly6], 4, If[IsInRegion[E, poly6], 5, If[IsInRegion[F, poly6], 6, If[IsInRegion[G, poly6], 7, If[IsInRegion[H, poly6], 8, If[IsInRegion[I, poly6], 9, 0]]]]]]]]) → sixSum
  13. If(IsInRegion[A, poly5], 1, If[IsInRegion[B, poly5], 2, If[IsInRegion[C, poly5], 3, If[IsInRegion[D, poly5], 4, If[IsInRegion[E, poly5], 5, If[IsInRegion[F, poly5], 6, If[IsInRegion[G, poly5], 7, If[IsInRegion[H, poly5], 8, If[IsInRegion[I, poly5], 9, 0]]]]]]]]) → fiveSum
  14. If(IsInRegion[A, poly3], 1, If[IsInRegion[B, poly3], 2, If[IsInRegion[C, poly3], 3, If[IsInRegion[D, poly3], 4, If[IsInRegion[E, poly3], 5, If[IsInRegion[F, poly3], 6, If[IsInRegion[G, poly3], 7, If[IsInRegion[H, poly3], 8, If[IsInRegion[I, poly3], 9, 0]]]]]]]]) → threeSum
  15. If(IsInRegion[A, poly2], 1, If[IsInRegion[B, poly2], 2, If[IsInRegion[C, poly2], 3, If[IsInRegion[D, poly2], 4, If[IsInRegion[E, poly2], 5, If[IsInRegion[F, poly2], 6, If[IsInRegion[G, poly2], 7, If[IsInRegion[H, poly2], 8, If[IsInRegion[I, poly2], 9, 0]]]]]]]]) → twoSum
  16. Mod(onesPlace, 10) → SAone
  17. Mod(tensPlace + Div[onesPlace, 10], 10) → SAten
  18. Div(onesPlace, 10) → SAtensCarry
  19. Div(tensPlace + Div[onesPlace, 10], 10) → SAhundredsCarry
  20. Sequence(Point[{i, 2.5}], i, -5, 3) → anchors
  21. Polygon(L, M, N, O) → q1, l, m, n, o

AI 绘图提示语参考

绘制一系列正方形，每个正方形的边长依次减少0.9，从左到右依次排列。每个正方形内部放置一个数字，数字的和为100。数字按照个位和十位分开计算，个位数从左下角的正方形开始，依次向右和向上排列，十位数从个位数的右侧开始，依次向右排列。
以上提示语为根据原始绘图命令整理而来，仅供参考。