[填空题] 下列过程的功能是：用来计算并输出S = 1+1/2+1/3+…+1/100的值。请完善程序。
Function SumF(n As Integer)As Single
s = 0
For i = 1 To n
s = ______
Next i
SumF = s
End Function
Private Sub Form_Click( )
Sum1 = SumF(100)
Print "sum1 = "; sum1
End Sub
正确答案：s+1/i
![[填空题] 下列过程的功能是：用来计算并输出S = 1+1/2+1/3+…+1/100的值。请完善程序。 Function SumF(n As Integer)As Single s = 0 F](http://www.mshxw.com/aiimages/31/479983.png "[填空题] 下列过程的功能是：用来计算并输出S = 1+1/2+1/3+…+1/100的值。请完善程序。 Function SumF(n As Integer)As Single s = 0 F")
[填空题] 下列过程的功能是：用来计算并输出S = 1+1/2+1/3+…+1/100的值。请完善程序。
Function SumF(n As Integer)As Single
s = 0
For i = 1 To n
s = ______
Next i
SumF = s
End Function
Private Sub Form_Click( )
Sum1 = SumF(100)
Print "sum1 = "; sum1
End Sub
正确答案：s+1/i
名师互学网 版权所有 (c)2021-2022 ICP备案号：晋ICP备2021003244-6号
