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

admin2017-11-23  39

问题 有下面程序代码:
    Private Sub Commandl_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 6 12 20 30
B、2 12 20 56 90
C、30 28 24 18 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://kaotiyun.com/show/J8Gp777K
0

最新回复(0)