求证：n是否为素数,只需判断n能否被2
问题描述：
求证：n是否为素数,只需判断n能否被2
答
vb方法
Dim n As Double
n = Text1.Text
a = 2
m = Int(Sqr(n))
s = 0
While a