首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
admin
2020-07-22
26
问题
编写如下程序:
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/bXHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
能够存放组合框的所有项目内容的属性是
假定有如下程序:PrivateSubFormClick()Dima(4)AsInteger,b(4)AsIntegerFork=0To2a(k+1)=Val(InputBox("请输入一个整数
编写如下程序:PrivateSubCommandl_Click()PrivateFunctionfun1(ByValmAsInteger,DimxAsInteger,yAsInteger
下列数据流图(DFD)构造规则中正确的是()。
在一个有若干个整数的顺序文件中查找一个数(这个数从文本框中输入),找到后在标签Label1中显示该数是文件中第几个数;如果没找到,则显示文件中没有该数的信息PrivateSubCommand1_Click()DimxAsInteger
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
对下列二叉树进行前序遍历的结果为
某二叉树中度为2的结点有10个,则该二叉树中有()个叶子结点。
在深度为7的满二叉树中,度为2的结点个数为
将E—R图转换为关系模式时,实体和联系都可以表示为()。
随机试题
绘画
张某,男,1988年5月出生。李某,男,l993年3月出生。2009年6月,张某找到李某提出要李某帮忙实施抢夺,两人做如下分工:李某骑摩托车,张某坐在摩托车后座上伺机动手。2009年7月的一天,李某骑摩托车带张某来到一繁华路段,张某趁一行人不备抢其公文包
下列关予家庭生命周期的各阶段不同的理财重点中,不合适的是()。
sostarteasybadlysomeonedifficultifthankclassreportermedicalsucceedProvingThem
坚持党要管党的原则,要求党把全部精力用在党的建设上。()
(2001年)设总体X服从正态分布N(0,22),而X1,X2,…,X15是来自总体X的简单随机样本,则随机变量Y=(X12+…X102)/2(X112+…+X152)服从______分布,参数为_________。
Studentsofeconomicsareinrevoltagain.Thisyear,65groupsofstudentsfrom30countriesestablishedanInternationalStude
Whenwilltheboardmeetingbearrangedaccordingtotheman?
Forthispart,youareallowed30minutestowriteaposterforafleamarket.Youshouldwriteatleast150wordsbutnomoret
A、Theirbrainscan’tworkwellsometimes.B、Theycan’tidentifyaperson’sfaceclearly.C、Theydon’tknowhowtoanalyze.D、The
最新回复
(
0
)