A.-1
B.0
C.1
D.2
第2题
Dim cout(25)As Integer,ch As String
ch=Ucase(Int,utBox("请输入字母字符串"))
For k=1 To i en(ch).
n=ASC(Mid(ch,k,1))-Asc("A")
If n>=0 Then
count(n)=count(n)+1
End If
Next k
m=count(0)
For k=1 To 25
If m<count(k)Then
m=count(k)
End If
Next k
Print m
End Sub
A.0
B.1
C.2
D.3
第5题
A、4
B、1
C、0
D、运行时出错,无定值
第6题
B、调试分析结果
C、4
D、16
E、32
第7题
A、4
B、1
C、2
D、运行时出错,无定值
第9题
A.a=/*pl-m;
B.b=*p1+*p2+6;
C.k=1,m=8;
D.pl=&k,p2-&m;
第10题
A、3
B、4
C、6
D、9
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!