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

admin2010-11-20  27

问题 以下程序用于计算“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

选项

答案n+2,exit do

解析 该累加问题没有给出需要累加的数据项的数目,不能用for循环。do... Loop为无条件循环,在do循环中由累加项term的值作为退出循环的条件。
转载请注明原文地址:https://jikaoti.com/ti/sXO0FFFM
0

最新回复(0)