有下面程序代码: Private Sub Command1_Click() a=Array(1,2,3,4,5,6,7,8,9,10):n=UBound(a) For k=0 To UBound(a)/2 Print a(k)*a(n);:n=n-1 Ne

admin2016-09-19  56

问题 有下面程序代码:
Private Sub Command1_Click()
a=Array(1,2,3,4,5,6,7,8,9,10):n=UBound(a)
For k=0 To UBound(a)/2
Print a(k)*a(n);:n=n-1
Next k
End Sub
程序运行后,单击命令按钮Commandl,输出结果是

选项 A、2 612 20 30
B、2 12 20 56 90
C、30 28 2 418 10
D、10 18 24 28 30

答案D

解析 使用Array函数建立的数组其下标下界为0,n的值是数组的上界即9;在循环中k从0循环到数组长度的一半,每次输出a(k)*a(n)的值然后令n-1,故此容易得到每次输出的是数组两端值之积,依次向数组中间移动,即1*10、2*9、3*8、4*7、5*6。
转载请注明原文地址:https://jikaoti.com/ti/90J0FFFM
0

最新回复(0)