窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1 To 4 For j=1 To 4 a(i,j

admin2016-06-23  26

问题 窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
Option Base1
Private Sub Command1_Click()
Dim a(4,4)As Integer
For i=1 To 4
For j=1 To 4
a(i,j)=Int(Rnd*100)
Next
Next
x=a(1,1)
y=a(1,1)
For i=1To 4
For j=1 To 4
If x<a(i,j)Then x=a(i,j)
If y>a(i,j)Then y=a(i,j)
Next
s=s+a(i,i)
Next
Print x,y,s
End Sub
关于以上程序,以下叙述中错误的是

选项 A、二维数组元素的值是不大于99的随机整数
B、计算结果x是二维数组各元素中的最大数
C、计算结果y、是二维数组各元素中的最小数
D、计算结果s是二维数组各行第一个元素之和

答案D

解析 程序首先通过For循环给数组a元素赋值。取随机数函数返回的值介于0和1之间。乘以100后取整介于0和99。故A正确。接下来对x和y赋初值(s的第一个元素),在循环内部进行数值大小的比较,把当前比x大的存入x,比y小的存入y,循环结束后,x中存储的是最大值,y中存储的是最小值。故B,C对。s中存储一维和二维下标相同的数组元素的和。选D。
转载请注明原文地址:https://jikaoti.com/ti/Z9J0FFFM
0

最新回复(0)