n 为要验证的数
For i = 2 To Int(Sqr(n))
'从2开始，到根号n（取整数）循环
I f n Mod i = 0 Then Exit For
’如果i除n的余数为0，则退出循环
Next i
If i > Int(Sqr(n)) Then
'如果i>根号n（取整数）,说明没有提前退出循环
Print n & 不是素数;
'打印：
End If
不清楚耶，用数学算法告诉你好了：
INPUT "n="; n
输入n
IF n divides x(x>=2 and x
那么输出“n不是质数”
ELSE
否则
PRINT n is a prime number
输出“n是质数”
END IF
结束
END
结束
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024