以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”,直至“1/(2n+1)”小于10-4。阅读下面程序,请在【 】和【 】
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”,直至“1/(2n+1)”小于10-4。阅读下面程序,请在【 】和【 】处填上正确内容。 Private Sub Command1_Click() Sum = h: n = i do n=【 】 term =1/ n Sum = Sum + term if term <0.0001 then【 】 Loop Text1.Text = n Text2 *Text = Sum End Sub