问题 填空题

在窗体上画一个名称为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/2t=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)的值互换。请填空。

答案

参考答案:【13】 a

解析:【14】 10【15】n=n-1[评析] Option Base语句在模块级别中使用,用来声明数组下标的起始值(缺省值为0)。子过程利用语句加以调用,使子过程成为一个独立的语句,其形式为:子过程名[参数列表]或Call子过程名[参数列表]。题目要求将数组中的10个数逆序存放,也就是首尾两两交换,循环次数应为5次,在交换了a(1)与a(10),应将n的值减1,再将a(2)与a(9)进行交换,依此类推。

判断题
单项选择题