试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省诸暨市牌头中学2018届高三上学期信息技术期中考试试题
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c = 0: n = 10
For i = 1 To 10 Step 2
If n Mod i = 0 Then
c = c * i
Else
c = c + i
End If
Next i
Text1.Text = Str(c)
End Sub
For k = 1 To 4 Step 3
For i = k To k + 1
For j = i + 1 To k + 2
If a(j) < a(i) Then
temp = a(j): a(j) = a(i): a(i) = temp
Next j
Next k
数组元素a(1)到a(6)的值依次为“9,8,7,6,5,4”，经过该程序段“加工”后，数组元素a(1)到a(6)的值依次为（ ）
试题篮
