画出计算1^2+3^2+5^2+… +199^2的程序框图

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/08 07:35:13

画出计算1^2+3^2+5^2+… +199^2的程序框图
画出计算1^2+3^2+5^2+… +199^2的程序框图

画出计算1^2+3^2+5^2+… +199^2的程序框图

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

顺序执行