搜索
Dim n As Integer, L As Integer, R As Integer, sum As Long, i As Integer
List1. Clear
n= Int(Rnd*3+11)*2+1
L=1:sum= 0
For R=1 To n\2+1
Sum = sum+ R
Do While sum > n
Sum = sum - LL=L+1
Loop
If sum = n Then
Listl. AddItem Str(L) + " "+ Str(R)Exit For
End If
Next R执行该程序段后，列表框List1中的值不可能为（ ）
| A．27 | B．13 14 | C．3 7 | D．11 12. |
同类型试题
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
