填空题

下列程序的运行结果为 【11】 。 A="1" B="2" A=Val (A) +Val (B) B=Val ("12") If A<>B Then Prink A-B Else Print B-A (11)阅读下列程序: 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=l to 3 For k=1 to 3 Print a (j.k); Next k Next j End Sub 运行程序时,输出的结果是 【12】

【参考答案】

-9
热门 试题

填空题
填空题
可以使用 【8】 键添加断点。