试题 试卷
题型：单选题 题类： 难易度：容易
新疆伊犁哈萨克自治州霍城县2023-2024学年高一上学期信息技术10月月考试卷
图1 图2
Private Sub Command1_Click()
Dim a(0 To 9)As Integer
Dim 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
End Sub
若在文本框Text1中输入10242048，则程序执行后，变量x的值为（ ）
S=0
For i=1 To 3
s=s+2
Print s
max=a(1)
For i=2 To 10
当虚线框内的语句刚好执行完第6次后(此时循环变量i的值为7)，变量max的值是（ ）
试题篮
