填空题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： 　　Private Sub Command1_Click() 　　　n = 5 　　　f = 1 　　　s = 0 　　　For i = 1 To n 　　　　f = f　【12】　 　　　　s = s + f 　　　Next 　　　Print s 　　End Sub 　　该事件过程的功能是计算 　　s=1+1/2!+1/3!+…+1/n! 　　的值。请填空。

【参考答案】

/i
<上一题 目录 下一题>
热门 试题

填空题
阅读程序： Option Base1 Private Sub Form_Click( ) Dim a(3)As Integer Print“输入的数据是：”； For i＝1 To 3 a(i)=InputBox(“输人数据”) Print a(i)； Next Print If a(1) t=a(1) a(1)=a(2) a(2)= 【8】 End If If a(2)>a(3) Then m=a(2) Else If a(1)>a(3)Then m= 【9】 Else m= 【10】 End If Print“中间数是：”；m End Sub 程序运行后，单击窗体，在输入对话框中分别输人三个整数，程序将输出三个数中的中间数，如图所示。请填空。
填空题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer For i = 1 To 10 a(i) = i Next Call swap（ 【13】 ） For i = 1 To 10 Print a(i); Next End Sub Sub swap(b() As Integer) n = 【14】 For i = 1 To n 2 t = b(i) b(i) = b(n) b(n) = t 【15】 Next End Sub 上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。请填空。
相关试题