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

admin2010-11-20  27

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

选项 A、25
36
B、58
69
C、47
58
D、59
68

答案B

解析 依题意,声明一个3行3列的数组,并用嵌套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://kaotiyun.com/show/IIhp777K
0

最新回复(0)