问题
单项选择题
现有程序如下:
Option Base 1
Private Sub Form_Click()
Dim x(5, 6)As Integer, y(5)As Integer
For i = 1 To 5
For j =1 To 6
x(i, j) = Int(Rnd * 9+1)
Next j
Next i
Call f(5, 6, x, y)
For i=1 To 5
Print y(i);
Next i
End Sub
Sub f(m As Integer, n As Integer, a()As Integer, b()As Integer)
For i = 1 To m
b(i) =0
For j = 1 To n
b(i) =b(i) +a(i, j)
Next j
Next i
End Sub
关于上述程序,以下叙述中正确的是( )。
A) 调用过程语句有错,参数不匹配
B) 程序有错,数组下标越界
C) y数组中保存的是x数组每行数据之和
D) x数组中数据的取值范围是1-10
答案
参考答案:C
解析: 程序利用了For循环为数组x的5行6列元素以随机整数赋值,随机数的范围是从1到9。过程f的功能是计算二维数组a()的每一行中元素值的和,每一行的和存放在另一个数组b()中,最后程序输出这些和值。因此C正确。