判断一个数是否是质数,其中if i=x 是何意?Private Sub Form_Click()Dim x As Integerx = InputBox("")For i = 2 To x - 1If x Mod i = 0 Then Exit ForNext iIf i = x ThenMsgBox "是素数"ElseMsgBox "不是素数"End IfEnd Sub
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/27 17:50:56
判断一个数是否是质数,其中if i=x 是何意?Private Sub Form_Click()Dim x As Integerx = InputBox("")For i = 2 To x - 1If x Mod i = 0 Then Exit ForNext iIf i = x ThenMsgBox "是素数"ElseMsgBox "不是素数"End IfEnd Sub
判断一个数是否是质数,其中if i=x 是何意?
Private Sub Form_Click()
Dim x As Integer
x = InputBox("")
For i = 2 To x - 1
If x Mod i = 0 Then Exit For
Next i
If i = x Then
MsgBox "是素数"
Else
MsgBox "不是素数"
End If
End Sub
判断一个数是否是质数,其中if i=x 是何意?Private Sub Form_Click()Dim x As Integerx = InputBox("")For i = 2 To x - 1If x Mod i = 0 Then Exit ForNext iIf i = x ThenMsgBox "是素数"ElseMsgBox "不是素数"End IfEnd Sub
素数:指在一个大于1的自然数中,除了1和此整数自身外,没法被其他自然数整除的数.换句话说,只有两个正因数(1和自己)的自然数即为素数.比1大但不是素数的数称为合数.
如果输入的是7在for循环的最后一次经过Next i后,i变成7大于7-1所以不进入循环,但i就是输入的7本身,所以根据定义可以得出结论.7是素数
如果i=x
也就是除1以外只能被自己整除