Dim a(1 To 6) As Integer
Randomize
a(1) = Int(11 * Rnd) + 2
For i = 2 To 6
a(i) = Int(11 * Rnd) + 2
If i Mod 2 = 1 And Not prime(a(i)) Then
i = i - 1
ElseIf Not prime(a(i)) Then
a(i) = a(i) + a(i - 1)
End If
Next i
自定义函数 prime()用于判断参数是否为质数,prime(n) = True 则说明 n 为质数,否则为合数,定义函数代码略,执行该程序后,a(1)~a(6)的值不可能为( )
A.7, 10, 3, 7, 11, 23 | B.4, 10, 5, 11, 3, 11 |
C.6, 10, 7, 16, 7,7 | D.12, 2, 11, 3, 3, 13 |
同类型试题
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