试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省高中信息技术 数组练习
Dim a(0 To 9) As Integer, t as Long
t=Val(Text1.Text)
Do While t<>0
a(t Mod 10) = 1
t = t \ 10
Loop
For i = 0 To 9
x = x + a(i)
Next i
Text1中输入10242048,则程序执行后x的值为( )
m=1:k=1
For i=2 To 10
If a(i)<a(i-1)Then
k=k+1
If k>m Then m=k
Else
k=1
End If
Text1.Text=Str(m)
End Sub
执行该程序段,文本框Text1中显示的是 ( )
a = a + b
b = a + b
a和b的值分别为( )
试题篮