下列程序的功能是求出所有的1~100之间的孪生素数。孪生素数是指两个素数的差为2 如3和5 11和1
下列程序的功能是求出所有的1~100之间的孪生素数。孪生素数是指两个素数的差为2,如3和5,11和13等,请填空。 Private Sub Form_Click() Dim i As Integer For i=3 To 97 Step 2 If【 】Then Print i,i+2 End If Next i End Sub Public Function prime(ByVal n As Integer)As Boolean Dim i As Integer For i=2 To n-1 If【 】Then Exit For End If Next i If i=n Then prime=True Else prime=False End If
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:prime(i) And prime(i+2) n Mod i=0
此题prime函数用来判断参数n是否为素数,如果是,则返回True,否则返回0,判断素数的算法请参看相应章节,[15处应填“nModi=0”。要找出100以内的所有孪生素数,可采用以下方法:可用循环变量i从第一个素数3开始判断该数和它的下一个奇数(只有奇数才有可能是素数)是否同时为素数,如果是,则把该数和它的下一个奇数输出,然后循环变量加2,接着进行判断……,此处判断某数是否为素数,可以通过调用函数Prime来实现,故[14处应填“prime(i)Andprime(i+2)”。
相似问题
图片按钮的【 】属性用来设置命令按钮无效时显示的图形。请帮忙给出正确答案和分析 谢谢!
图片按钮的【 】属性用来设置命令按钮无效时显示的图形。请帮忙给出正确答案和分析,谢谢!
在窗体上画一个列表框 然后编写如下两个事件过程: Private Sub Form_Click()
在窗体上画一个列表框,然后编写如下两个事件过程: Private Sub Form_Click() List1.RemoveItem 1 List1.Removeltem 3 List1.RemoveItem 1
随机生成的10个两位数 求出它们的总和和平均数。产生两位数采用的算法如下:分别产生个位数(0~9)和
随机生成的10个两位数,求出它们的总和和平均数。产生两位数采用的算法如下:分别产生个位数(0~9)和十位数(1~9),然后十位数乘10再加上个位数即得到一
在窗体上画一个列表框 一个命令按钮和一个标签 其名称分别为List1 Command1和Labe11
在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Labe11,通过属性窗口把列表框中的项目设置为:“第一个项目”、“第二个
在程序执行闲置循环过程中 程序的控制权被系统占用。若要获得控制权 可以使用一个语句 这样用户可以在获
在程序执行闲置循环过程中,程序的控制权被系统占用。若要获得控制权,可以使用一个语句,这样用户可以在获得系统的控制权后进行其他操作,这个语句是【
