填空题
下列程序是判断一个整数(>=3)是否为素数,请补充完整。
Dim n As Integer
n=InputBox("请输入一个整数(>=3)")
k=Int(Sqr(n))
i:2
swit=0
While i<=k And swit=0
If n Mod i=0 Then
[7]
E1se
[8]
End If
Wend
If swit=0 Then
Print n;"是一个素数。"
E1se
Print n;"不是一个素数。"
End If
【参考答案】
I=I+1
点击查看答案
<上一题
目录
下一题>
热门
试题
填空题
504
点击查看答案&解析
填空题
j<=i
点击查看答案&解析
相关试题
a(j) Mod 5=0
(99*Rnd)+1
504
504
Exit For