问题
填空题
下列程序的功能是求算式:1+1/2!+1/3!+i/4!+……前10项的和(其中n!的含义是n的阶乘)。请在空白处填入适当的语句,使程序完成指定的功能。
Private Sub Command1_Click()
Dim i as Integer,s as single,a as single
a=1:s=0
For i=1 To 10
a=______
s=s+a
Next i
Debug.Print "1+1/2!+1/3!+…=";s
End Sub
答案
参考答案:a/i
解析: 在本题程序中,变量a中需要存放的是“1/n!”的值,然后通过for循环,将值依次赋值给变量a,通过语句“s=s+a”将所有的值相加,最后返回前10项的和。