对于一个不小于3的正整数,设计一个算法判断该正数是否是素数

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 01:02:49
对于一个不小于3的正整数,设计一个算法判断该正数是否是素数

对于一个不小于3的正整数,设计一个算法判断该正数是否是素数
对于一个不小于3的正整数,设计一个算法判断该正数是否是素数

对于一个不小于3的正整数,设计一个算法判断该正数是否是素数
设这个数为n,则用2到根号n取整试除,若都不能整除,则为素数,否则为合数.

设这个数为n,则用2到根号n取整试除,若都不能整除,则为素数,否则为合数。

Dim a, b, c
c = 0
a = Text1.Text
If a <= 3 Then
msgbox "输入数值不小于3"
Else
For b = 2 To a - 1
c = a Mod b
If c = 0 Then
Exit For
End If
Next
If c = 0 Then
Print "是素数"
Else
Print "不是素数"
End If
End If