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

问题 下面程序运行后,输出的结果是
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://jikaoti.com/ti/o3g0FFFM
0

最新回复(0)