计算圆的周长

计算圆的周长
几何画板及绘图内容加载中,请稍等……
2024-12-19 16:39
本范例演示如何通过半径计算圆的周长。核心数学概念包括圆的周长公式及其应用。使用GeoGebra命令如Circle, Ray, Intersect, Segment等进行几何作图。适合初中7-8年级学生练习圆周长的计算。

GeoGebra 命令及参数

  1. Circle(M, B) → c
  2. Ray(B, M) → g
  3. Intersect(c, g) → C, D
  4. Segment(B, D) → d
  5. Textfield(input1) → InputBox1
  6. Textfield(input2) → InputBox2
  7. Shuffle(Sequence[Random[1, 20], i, 1, 100]) → randomNosForX, {8, 12, 15, 8, 4, 17, 19, 14, 9, 7, 20, 16, 9, 17, 8, 13, 17, 15, 5, 1, 6, 20, 1, 8, 19, 12, 8, 3, 6, 1, 10, 15, 19, 8, 1, 12, 5, 12, 3, 18, 16, 9, 5, 20, 7, 18, 16, 19, 11, 16, 16, 15, 19, 7, 3, 15, 17, 9, 5, 10, 8, 18, 18, 17, 3, 9, 1, 12, 16, 20, 12, 12, 7, 20, 5, 11, 10, 8, 14, 2, 18, 12, 19, 4, 17, 2, 14, 3, 8, 4, 15, 19, 19, 4, 12, 11, 17, 9, 11, 1}
  8. Element(randomNosForX, Mod[questionCount, 100] + 1) → numX
  9. Shuffle(Sequence[Random[1, 99], i, 1, 100]) → randomNosForY, {81, 74, 6, 31, 82, 47, 84, 43, 53, 94, 41, 98, 56, 89, 86, 18, 62, 11, 80, 88, 30, 79, 8, 21, 38, 33, 31, 33, 11, 80, 87, 7, 32, 19, 99, 69, 77, 55, 95, 95, 29, 14, 2, 92, 87, 28, 13, 35, 21, 65, 36, 76, 95, 58, 39, 27, 34, 46, 1, 64, 72, 24, 51, 25, 62, 47, 94, 94, 30, 34, 39, 7, 9, 87, 13, 49, 21, 81, 50, 13, 15, 49, 79, 24, 25, 59, 5, 55, 2, 27, 86, 15, 33, 83, 31, 21, 87, 10, 31, 39}
  10. Element(randomNosForY, Mod[questionCount, 100] + 1) → numY
  11. If(Mod[questionCount, 2] ≟ 0, ((2 * num) * pi), (num * pi)) → umfang
  12. Polygon(PtopLeftCornerFeedback, PtopRightCornerFeedback, PbottomRightCornerFeedback, PbottomLeftCornerFeedback) → rectangleCorrect, rectangleCorrectS3, rectangleCorrectS4, rectangleCorrectS2, rectangleCorrectS1
  13. Append(true, Sequence[If[randomNosForX(i) ≟ randomNosForX(i - 1), false, true], i, 2, 100]) → stayX
  14. Append(true, Sequence[If[randomNosForY(i) ≟ randomNosForY(i - 1), false, true], i, 2, 100]) → stayY
  15. Remove(Sequence[If[stayX(i), randomNosForX(i), 0], i, 1, 100], Sequence[0, i, 1, 100]) → randomNosForXwithoutRepeat
  16. Remove(Sequence[If[stayY(i), randomNosForY(i), 0], i, 1, 100], Sequence[0, i, 1, 100]) → randomNosForYwithoutRepeat
  17. Element(randomNosForXwithoutRepeat, Mod[questionCount, Length[randomNosForXwithoutRepeat]] + 1) → numXwithoutRepeat
  18. Element(randomNosForYwithoutRepeat, Mod[questionCount, Length[randomNosForYwithoutRepeat]] + 1) → numYwithoutRepeat
  19. Segment(M, B) → r
  20. RemoveUndefined({floor(input1 / 10), Mod[floor(input1), 10], floor(Mod[round((input1 * 100)), 100] / 10), Mod[round((input1 * 100)), 10]}) → listInput
  21. RemoveUndefined({floor(sol / 10), Mod[floor(sol), 10], floor(Mod[round((sol * 100)), 100] / 10), Mod[round((sol * 100)), 10]}) → listSol
  22. If(Mod[questionCount, 2] ≟ 0, (num * pi), ((2 * num) * pi)) → umfangVertauscht
  23. Mod((input1 * 1000), 10) → hintRunden