当前位置>>常用算法>>算法3    
返回首页  
 

 
     
 

算法3 判断素数

 
 
算法描述
判断一个数是不是素数
算法分析
 只能被1或本身整除的数称为素数。其基本思想:把m作为被除数,将2-INT()作为除数,如果都除不尽,m就是素数,否则就不是。

代码如下:

m =val( InputBox("请输入一个数"))
For i=2 To int(sqr(m))
If m Mod i = 0 Then    Exit  For
Next i
If i > int(sqr(m)) Then
Print "该数是素数"
Else
Print "该数不是素数"
End If