[填空題] 下列過程的功能是用來計(jì)算并輸出S=1+1/2+1/3+……+1/100的值，請(qǐng)完善程序。 Function SumF(n As Integer)As
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 ns= 【12】 Next i SumF=s End Function Private Sub Form_Click() Sum1=SumF(100) Print 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)之和，在For-Next循環(huán)中每次循環(huán)都增加1/i。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。