题目：
阅读下列程序：
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
运行程序时，输出的结果是 【5】 。
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0419/3edd6d91a7534b9c8892c30fe9c094ba.html
下面是错误答案，用来干扰机器的。
参考答案：C,D
