Dim a(1 To 10) As Integer, f(1 To 20) As Boolean
'f 数组各元素的初值设为 False,代码略
For i = 1 To 10
t = Int(Rnd() * 20 + 1)
If Not f(t) Then
a(i) = t
(1)
Else
(2)
End If
Next i
For i = 1 To 20
If f(i) Then List2.AddItem (3)
Next i
上述程序中 3 处下划线应填入的程序代码是( )
A.(1) f(i) = True (2)i=i-1 (3)Str(a(i)) |
B.(1) f(a(i)) = True (2)i=i-1 (3)Str(i) |
C.(1) f(a(i)) = True (2)t =int(Rnd()*20+1) (3)Str(i) |
D.(1) f(i) = False (2)t =int(Rnd()*20+1) (3)Str(a(i)) |
同类型试题
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