试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省台州中学2018届高三上学期信息技术第四次统练试卷
Max=-10000
For i = 1 To 10
s = 0
For j = i To 10
s = s + a(j)
If s > max Then max = s
Next j
Next i
已知数组a(1)到a(10)的原始数据为6，-6，8，-7，7，2，-2，-1，-2，4．程序执行后，变量max的值为（ ）
Private Sub Command1 Click()
Dim a As Integer, b As Integer
a = 5: b = 8
b = a + b
label1.Caption = Str(b)
End Sub
引发此错误的语句可能为（ ）
Dim n As Integer，s As String
n = 64 :s = ""
Do While n > 0
s = Str(n Mod 7) + s
n = n \ 7
Loop
执行该程序段后，变量s的值是（ ）
Dim a(1 To 10) As Integer，b(1 To 10) As Integer
k = 0
For i = 10 To 1 Step -1
Do While b(i) <> 0 k = k + 1
a(k) = i: b(i) = b(i) - 1
若 a(1)～a(10)的值分别为 7，9，8，1，9，4，4，2，1，1，则运行以上程序后，下列说法正确的是（ ）
试题篮
