[填空題] 下列過程的功能是：用來計(jì)算并輸出S=1+1/2+1/3+…+1/100的值。請(qǐng)完善程序。 Function SumF(n As Integer)A
2021-07-20
[填空題] 下列過程的功能是：用來計(jì)算并輸出S=1+1/2+1/3+…+1/100的值。請(qǐng)完善程序。
Function SumF(n As Integer)As Single
s=0
For i=1 To n
s=______
Next i
SuraF=s
End Function
Private Sub Form_Click( )
Sum1=SumF(100)
Print "sum1=" :sum1
End Sub
正確答案：s+1/i
參考解析：從公式可以看出，第一項(xiàng)為1/1，第二項(xiàng)為1/2，第三項(xiàng)為1/3，…，第n項(xiàng)為1/n。也就是說，分母每次增加1，而分子始終為1。為求前n項(xiàng)之和，在ForNext循環(huán)中每次循環(huán)都增加1/n。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。