2. 计算机
  3. 阅读下列程序。 Option Base 1 Private Sub Form CliCk() Dim x(3,3) For j=1 to 3 For k=1 to 3 If j=k then x(j,k)=1 If j＜＞ k then x

阅读下列程序。 Option Base 1 Private Sub Form CliCk() Dim x(3,3) For j=1 to 3 For k=1 to 3 If j=k then x(j,k)=1 If j＜＞ k then x

admin2009-05-20  66
问题 阅读下列程序。
Option  Base  1
Private Sub  Form  CliCk()
Dim  x(3,3)
For j=1 to 3
For k=1 to 3
If j=k  then  x(j,k)=1
If j＜＞ k then  x(j,k)=3
Next k
Next j
Call  fun(x())
End Sub
Private Sub fun(a())
For j=1 to 3
For k=1 to 3
Print a (j,k)；
Next k
Next j
End Sub
运行程序时，输出的结果是【  】。
选项
答案1 3 3 3 1 3 3 3 1
解析 本题主要考查考生数组虚实结合掌握的情况。事件过程定义又生成了 3*3的数组，该数组的主对角线元素为1，其余元素为3。接着调用了通用过程。调用通用过程时，首先进行虚实结合，然后执行通用过程。执行过程后，返回调用它的事件过程。本题中调用通用过程时，进行虚实地址结合，在通用过程中访问的a数组就是事件过程中的X的数组。在过程中，按行优先顺序输出了a数组所有的元素的值。由于在输出时只执行了循环体的"printan，k)；”，输出数据后有分号。因此输出一行，输出的结果是：1 3 3 3 1 3 3 3 1。
转载请注明原文地址:https://www.kaotiyun.com/show/gl5p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)