有关电脑算法流程图的问题 从1加到100的算法流程图 急

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/20 08:22:07
有关电脑算法流程图的问题从1加到100的算法流程图急有关电脑算法流程图的问题从1加到100的算法流程图急有关电脑算法流程图的问题从1加到100的算法流程图急Rem语言:VisualBasic6.0Su

有关电脑算法流程图的问题 从1加到100的算法流程图 急
有关电脑算法流程图的问题 从1加到100的算法流程图 急

有关电脑算法流程图的问题 从1加到100的算法流程图 急

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