当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 下列程序的功能是:当发生窗体的单击事件时,求出3~1000之间的所有素数的和以及所有能被3和5整除的数的和(素数是指只能被1和它本身整除的数),并在窗体上把这两个和显示出来。 Private Sub Form_Click() Dim s1 As Long,s2 As Long Dim i As Integer For i=3 To 1000If prime(i) Then s1=s1+iElse If 【11】 Then s2=s2+iEnd If Next i Print s

  

参考答案:

[11]iMod3=0AndiMod5=0[12]prime=True

  参考解析

本题Prime()函数的功能是判断形参n是否为素数,若是,则返回True,不是则返回False。具体分析请参看有关章节。要使函数返回一个值,必须在函数中给函数名赋值,故[12]处应填“prime=True”。发生Form_Click事件时,将把3~1000之间的所有素数加到s1中,把能被3和5整除的数加到s2中,在循环中首先调用Prime()函数判断循环变量是否为素数,若是,则把它加到s1,否则应该判断循环变量i是否能被3和5整除,若能,则把它加到s2中,所以[11]处应填“iMod3=0AndiMod5=0”。

微信端