下面程序运行后,输出的结果是 Dim arr(3,3) For j=1 To 3   For k=1 To 3     Arr(j,k)=(j-1)*3+k   Next k Next j For j=2 To 3

admin2012-03-22  28

问题 下面程序运行后,输出的结果是    Dim arr(3,3)    For j=1 To 3      For k=1 To 3        Arr(j,k)=(j-1)*3+k      Next k    Next j    For j=2 To 3      For j=2 To 3        Print art(k,j);      Next k      Print    Next j

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

答案B

解析 依题意,声明一个三行三列的数组,并用嵌套for循环赋值如下:
   arr(1,1)=1 arr(2,1)=4 arr(3,1)=7
   arr(1,2)=2 arr(2,2)=5 arr(3,2)=8
   arr(1,3)=3 arr(2,3)=6 arr(3,3)=9
   最后用Print函数输出arr(2,2),arr(3,2),空行,arr(2,3),arr(3,3)。
转载请注明原文地址:https://jikaoti.com/ti/gSO0FFFM
0

最新回复(0)