作业帮 > 数学 > 作业

设计一个计算1+1/2+2/3+3/4+……+99/100的算法,并画出程序框图 急

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/06/30 21:59:47
设计一个计算1+1/2+2/3+3/4+……+99/100的算法,并画出程序框图 急
设计一个计算1+1/2+2/3+3/4+……+99/100的算法,并画出程序框图

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