有如下程序,运行时输出的结果是 ______。 Option Base 1 Private Sub Command1_Click() Dim a(3,3) As Integer For m=1 To 3

admin2009-03-15  28

问题 有如下程序,运行时输出的结果是 ______。        Option Base 1        Private Sub Command1_Click()        Dim a(3,3) As Integer     For m=1 To 3       For n=1 To 3         a(m-1,n-1)=m+n+1       Next n    Next m    For m=0 To 2       For n=0 To 2        Print a(n,m);       Next n       Print    Next m    End Sub

选项 A、0  1  2      1  2  3      2  3  4
B、3  4  5      4  5  6      5  6  7
C、1  3  5      3  5  7      5  7  9
D、2  4  6      4  6  8      6  8 10

答案2

解析 第一组双重循环语句对二维数组的9个元素赋值,注意数组下标的默认起点值为0,实际根据行列下标与其值的关系a(m-1,n-1)=m+n+1,元素值等于其行列下标号加3,因此,9个元素的值分别是{{3,4,5} {4,5,6}{5,6,7}}。因此,在第二组双重循环语句中,逐行逐列输出元素的值的排列顺序应该是选项B的结果。
转载请注明原文地址:https://jikaoti.com/ti/7Iq0FFFM
0

最新回复(0)