有如下程序段：
For i = 5 To 4 step -1
For j = 1 To i-1
If a(j) > a(i) Then
t = a(j): a(j) = a(i): a(i) = t
End If
Next j
Next i
数组元素a(1)到a(5)的值依次为“3，1，4, 2 ,5”，经过该程序段“加工”后，数组元素a(1)到a(5)的值依次为(   )

A．1,2,3,4,5

B．2,1,3,4,5

C．3,1,2,4,5

D．1,3,2,4,5

某算法的部分流程如图所示，执行这部分流程，结束时n的值为（    ）

A．1

B．2

C．3

D．4

用物理天平测量物体的质量。待测物体的质量为X克（X为小于1000的整数），以下程序功能为计算天平砝码盘中所需的砝码。已知天平可用的砝码为500克1个，200克1个，100克2个，50克1个，20克1个，10克2个，5克1个，2克2个，1克1个。程序界面如图所示。

Private Sub Command1_Click()

Dim a(1 To 12) As Integer, i As Integer, x As Integer

a(1) = 500: a(2) = 200: a(3) = 100: a(4) = 100: a(5) = 50: a(6) = 20

a(7) = 10: a(8) = 10: a(9) = 5: a(10) = 2: a(11) = 2: a(12) = 1

i = 1

x = Val(Text1.Text)

List1.Clear

Do While  ①   

If x >= a(i) Then

List1.AddItem Str(a(i))

   ②   

End If

i = i + 1

Loop   

End Sub

（1）上述代码中“List1.Clear”中的Clear是对象List1的
（选填： 属性 / 事件 / 方法）。
（2）为实现以上功能，画线①处应填入的代码为   
画线②处应填入的代码为  
（3）程序运行正确后，在文本框内输入708，并单击“计算”按钮。则程序运行结果为
（选字母A/B/C）。

A		B		C

 

有如下 Visual Basic 程序段：
s = 0
For k = To 5 s = s + k
Next k
该程序段运行后，循环体 s = s + k 被执行 10 次，则循环变量 k 的初值是（   ）

A．14

B．-5

C．1

D．-4

某算法流程图如图所示

执行该流程图后，输出i,k的值分别是

A．102，9

B．102，8

C．100，9

D．100，8