问题
单项选择题
下面程序运行后,输出的结果是 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) 2 5 B) 5 8 C) 4 7 D) 5 9 3 6 6 9 5 8 6 8
答案
参考答案: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)。