高校问答唔心的意思:有没有验算素数地程序
来源：百度文库 编辑：高校问答 时间：2024/04/30 06:00:24
最好要有网站！
用记事本编辑：
dim num,flag
flag=true
num=inputbox("")
for i = 2 to int(sqr(num))
if num mod i =0 then
flag=false
exit for
end if
next
if flag=true then
msgbox num & " YES"
else
msgbox num & " NO"
end if
'存成为VBS后缀文件就可以了。这样更简单。