有下面程序代码: Private Sub Command1_Click() Dim a(3, 3) As Integer s = 0 For i = 1 To 3 For j = 1 To 3

admin2015-06-30  23

问题 有下面程序代码:
Private Sub Command1_Click()
    Dim a(3, 3) As Integer
    s = 0
    For i = 1 To 3
        For j = 1 To 3
            a(i, j) = i * j
        Next j
    Next i
    For j = 1 To 3
       s = s + a(j, 4 - j)
    Next j
    Print s
End Sub
程序运行时的输出是

选项 A、10
B、14
C、18
D、6

答案A

解析 当完成一组嵌套for循环后,可以得到如下数据:
a(1,1)=1×1=1     a(2,1)=2×1=2     a(3,1)=3×1=3
a(1,2)=1×2=2     a(2,2)=2×2=4     a(3,2)=3×2=6
a(1,3)=1×3=3     a(2,3)=2×3=6     a(3,3)=3×3=9
接着程序执行最后一个for循环,当j=1时,s=0+a(1,3)=0+3=3;当j=2时,s=3+a(2,2)=3+4=7;当j=3时,s=7+a(3,1)=7+3=10。故正确答案为选项A。
转载请注明原文地址:https://jikaoti.com/ti/dw60FFFM
0

最新回复(0)