阅读下列程序。
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题:
请阅读以下程序: #include<stdio.h> void fun(int s[]) { static int j=0; do s[j]+=s[j+1]; while(++j<2);} main() { int k,a[10]={1,2,3,4,5}; for(k=1;k<3;k++)fun(a); for(k=0;k<5;k++)printf("%d",a[k]);} 上面程序的输出是
A.34756
B.23445
C.35745
D.12345
第2题:
下面程序运行后,输出的结果是
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
Next j
A.2 5 3 6
B.5 8 6 9
C.4 7 5 8
D.5 9 6 8
第3题:
阅读下列程序: main() { int n[3],i,j,k; for(i=0;i〈 3;i++) n[i]=0; k=2; for (i=0;i < k;i++) for (j=0;j〈 2;j++) n[j]=n[i]+1; printf("%dn",n[1]); } 下述程序运行后输出结果是
A.2
B.1
C.0
D.3
第4题:
3下面程序的运行结果是( )。
Option Base 1
Private Sub Commandl_Crick()
Dimx,y(3,3)
x=Array(1,2,3,4,5,6,7,8,9)
Fori=1 To 3
Forj=1 To 3
y(i,j)=(i*j)
If(j>=i)Then Printy(i,j);
Nextj
Nexti
End Sub

A.
B.
C.
D.
第5题: