[填空题] 下列程序是判断一个整数(>=3)是否为素数,请补充完整。 Dim n As Integer n=InputBox("请输入一个整数(>=3)") k=Int(Sq
18 查阅
[填空题] 下列程序是判断一个整数(>=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
参考答案: