作业帮 > 综合 > 作业

判断一个数是质数还是合数的最简单的编程?

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/09/13 07:40:33
判断一个数是质数还是合数的最简单的编程?
什么语言都行,关键程序最简单
'1.是两个大于 1 的整数之乘积;'
'2.拥有某大于 1 而小于自身的因数(因子);'
'3.拥有至少三个因数(因子);'
'4.不是 1 也不是素数(质数);'
'5.有至少一个素因子的非素数.
Private Sub Command1_Click()
Dim n%,i%,j%
n = Val(InputBox("请输入一个正整数!"))
For i = 2 To Sqr(n)
If n Mod i = 0 Then
j = j + 1
If j >= 3 Then
MsgBox "N是个合数!"
Exit Sub
End If
End If
Next
MsgBox "N是个质数!"
End Su