问题 单项选择题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写
如下事件过程:
Private Sub Command1_Click()
n=Val(Text1.Text)
For i=2 To n
For j=2 To Sqr(i)
If i Mod j=0 Then Exit For
Next j
If j>Sqr(i) Then Print i
Next i
End Sub
该事件过程的功能是 ______。

A.输出n以内的奇数

B.输出n以内的偶数

C.输出n以内的素数

D.输出n以内能被j整除的数

答案

参考答案:C

解析:[评析] 素数只能被1和它本身整除(即不能被大于1且小于它本身的整数来整除)故要检查一个整数是不是素数,可以用大于1而小于它的所有整数来除它,如果可以整除,就不是素数,否则就是素数。为了缩短程序运行时间,通常是用所有不小于该整数的平方根的整数来除它就可以。在本程序中,用从2开始到小于等于被检测整数平方根的所有整数来对被检测整数取模,如果被检测整数可以被其中的某个整数整除,则不是素数。故本程序的功能是输出n以内的素数。

单项选择题
填空题