问题 单项选择题

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

单项选择题
单项选择题