下面程序运行后，输出的结果是 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 89

问题下面程序运行后，输出的结果是
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://www.kaotiyun.com/show/IIhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类