作业帮 > 数学 > 作业

已知s=1^2+3^2+5^2+...+99^2,请设计程序框图计算s,并写出算法语句.

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/10/05 21:48:13
已知s=1^2+3^2+5^2+...+99^2,请设计程序框图计算s,并写出算法语句.

Rem 语言:Visual Basic 6.0
Sub Main()  '开始
  S = 0 :i = 1
  Do
    S = S + i ^ 2
    If Not (i < 99) Then Exit Do
    i = i + 2
  Loop
  MsgBox S,vbInformation,"输出"
End Sub  '结束