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

admin2010-11-20 73

问题下面程序运行后,输出的结果是
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 arr(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://kaotiyun.com/show/0lmp777K

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