搜索
Const n = 10
Private Sub Command1_Click()
Dim i As Integer, j As Integer, t As Integer, k As Integer, bottom As Integer
bottom = n: i = 1
Do While i <= bottom - 1
①
Do While j >= i + 1
If ② Then t = a(j) : a(j) = a(j - 1) : a(j - 1) = t
If a(j - 1) = a(j) Then
For k = j + 1 To bottom
③
Next k
bottom = bottom - 1
End If
j = j - 1
Loop
i = i + 1
Loop
End Sub为了实现上述功能,应在划线处填入的代码为（ ）
| A．① j = n ② a(j) < a(j - 1) ③ a(k) = a(k- 1) |
| B．① j = bottom ② a(j) < a(j - 1) ③ a(k - 1) = a(k) |
| C．① j = n ② a(j) > a(j - 1) ③ a(k - 1) = a(k) |
| D．① j = bottom ② a(j) > a(j - 1) ③ a(k) = a(k- 1) |
同类型试题
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
