A-A+

以下程序完成的功能是输入一个数n 并判断它是否为素数 是或不是都通过消息对话框(MsgBox

2022-08-12 20:12:40 问答库 阅读 197 次

问题详情

以下程序完成的功能是输入一个数n,并判断它是否为素数,是或不是都通过消息对话框(MsgBox)来给出提示。请将程序补充完整。 Private Sub Cemmand1_Click() n = InputBox (“请输入一个整数”) k = Int(Sqr(n)) i = 2 Flag = 0 do while i<= k And Flag = 0 if【 】 = 0 then Flag = 1 Else i= i+ 1 End if Loop if【 】then MsgBox “这是一个素数!”,vbOKOnly,“提示” Else MsgBox “这不是一个素数!”,vbOKOnly,“提示” End if End Sub


请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:n Mod IFlag=0
求素数的计算可以从2至终值Sqr(n),如果条件“nModi=0”成立(即余数为0),“Flag=1”,a不是素数,否则“Flag=0”,a是素数,即可打印“这是一个素数!”。

考点:素数,个数