试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省高中信息技术 算法及VB语言表达基础同步练习
For i = 1 To 3
For j = 1 To 10
If j Mod i = 0 Then a(j) = 1 - a(j)
Next j
Next i
sum = 0
For i = 1 To 10
sum = sum + a(i)
已知数组a的所有元素初值均为0，运行上述程序段后，变量sum的值是（ ）
max=10 000
For i=1 To 10
s=0
For j=i To 10
s=s+a(j)
If s>max Then max=s
已知数组a(1)到a(10)的原始数据为6，-6，8，-7，7，2，-2，-1，-2，4。程序执行后，变量max的值为（ ）
Private Sub Command1_Click()
Dim sum As Double, x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
End Sub
该程序计算了一个表达式的值，这个表达式是（ ）
Private Sub Form_Click()
Dim arr(1 to 10, 1 to 10） As Integer
Dim i As Integer, j As Integer
For i =2 To 4
For j = 2 To 4
arr(i, j） = i * j
Label1.Caption =str(arr(2, 2）+ arr(3, 3))
试题篮
