2. 计算机
  3. 编写如下程序： Private Sub Command1_Click() 　　Dim i As Integer， j As Integer 　　n＝InputBox("输入一个大于1的正整数") 　　For i＝2 To n 　　　　For j＝2 To

编写如下程序： Private Sub Command1_Click() 　　Dim i As Integer， j As Integer 　　n＝InputBox("输入一个大于1的正整数") 　　For i＝2 To n 　　　　For j＝2 To

admin2020-07-22  37
问题 编写如下程序：
Private Sub Command1_Click()
　　Dim i As Integer， j As Integer
　　n＝InputBox("输入一个大于1的正整数")
　　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以内所有的素数
答案D
解析 假设输入2、4、9进行验证，输入2时程序会输出2，输入4时，程序会输出2、3，可见程序不是判断n是否为素数，所以A不对。由前面验证可知，程序也不是输出n以内的所以奇数或偶数，所以B、C也不对。如果输入9时，程序会输出2、3、5、7，说明程序是输出n以内的所有素数，所以D正确。
转载请注明原文地址:https://kaotiyun.com/show/ICHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)