A.0.50.5
B.00
C.00.5
D.10.5
运行下列程序:
Private Sub Command1_Click()
Dim s1 As String * 1
Dim s2 As String
s1 = "a"
For i = Asc(s1) To Asc(s1) + 4
s2 = s2 & Chr(i)
Next i
Print s2
End Sub
单击Command1命令按钮后,则在窗体上显示的结果是()。
A.a
B.abcde
C.aaaa
D.s2
A.2
B.1
C.4
D.3
A.4
B.5
C.3
D.6
A.22
B.23
C.24
D.程序有误
有以下程序
main()
{ int a[4][4]={{1,4,3,2,},{8,6,5,7,},{3,7,2,5,},{4,8,6,1,}},i,k,t;
for(i=0;i<3;i++)
for(k=i+ 1 ;k<4;k++) if(a[i][i]<a[k][k]){t=a[i][i];a[i][i]=a[k][k];a[k][k]=t;}
for(i=0;i<4;i++)printf("%d,",a[0][i]);
}
程序运行后的输出结果是
A)6,2,1,1,
B)6,4,3,2,
C)1,1,2,6,
D)2,3,4,6,