首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command l_Click() Dim i As Integer,j As Integer n=InputBox(”输入一个大于1的正整数”)
编写如下程序: Private Sub Command l_Click() Dim i As Integer,j As Integer n=InputBox(”输入一个大于1的正整数”)
admin
2020-04-18
38
问题
编写如下程序:
Private Sub Command l_Click()
Dim i As Integer,j As Integer
n=InputBox(”输入一个大于1的正整数”)
For i=2 To n
Forj=2 To Sqr(i)
Ifi Modj=0 Then Exit For
Nextj
Ifj>Sqr(i)Then Print i
Next i
End Sub
该程序的功能是
选项
A、判断n是否为素数
B、输出n以内所有的奇数
C、输出n以内所有的偶数
D、输出n以内所有的素数
答案
D
解析
本题中的外循环是从2循环到n,然后进入内循环,在内循环中依次判断i能否被j整除,若能整除则退出内循环:内循环结束后进行判断,如果是中途退出内循环的则必然不满足i>Sqr(i),不会输出i的值;只有i不能被任何一个j整除的情况下才会输出i的值,即判断i是不是素数,只有素数才输出。
转载请注明原文地址:https://kaotiyun.com/show/niTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:PrivateSubForm_Click()Dam=InputBox(”请输入一个实数”):P=InStr(num,".")Ifp>0ThenPrintMid(num,P+1
设有如下函数:FunctionDelSpace(chAsString)AsIntegerDimn%,st$,c$st="":n=0Fork=lT0Len(ch)c=Mid
下面关于菜单的叙述中正确的是
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger)SelectCaseIndexCase0
在窗体上画一个名称为Filel的文件列表框,并编写如下程序:PrivateSubFile1_DblClickOx=Shell(File1.FileName,1)EndSub以下关于该程序的叙述中,错误的
假定Picturel和Textl分别为图片框和文本框的名称,则下列错误的语句是
以下关系表达式中,其值为True的是
表达式2*3^2+4*2/2+3^2的值是
表达式12/2\4的值是
随机试题
论述荒诞成为特殊审美形态的原因。
护士告诉肾挫伤非手术治疗的患者,其至少需要卧床的时间是
单室模型静脉注射给药血药浓度时间关系式是单室模型静脉滴注给药血药浓度时间关系式是
A、胆碱酯酶抑制药B、M受体阻断药C、α、β受体激动药D、α受体阻断药E、β受体阻断药肾上腺素属于()。
当人力资源供给大于需求的时候,为达到平衡可以采取的措施有()。
下列产品中,其生产类型属于连续型生产的有()。
甲公司于1月5日向乙公司以信件方式发出要约,向乙公司订购一批原材料,要求乙公司在10天内作出答复,该要约于1月6日到达乙公司。下列各项中,乙公司的做法属于承诺行为的有()。
阅读下面的陈述:有较明确的英语学习动机和积极主动的学习态度。能听懂教师有关熟悉话题的陈述并参与讨论。能就日常生活的各种话题与他人交换信息并陈述自己的意见。能读懂相关年级学习阅读的简单读物和报纸、杂志,克服生词障碍,理解大意。能根据阅读目的运用适当
打开考生文件夹下的演示文稿yswg.ppt,按照下列要求完成对此文稿的修饰并保存。1.在幻灯片的标题区中键入“中国的DXFl00地效飞机”,字体设置为:红色(注意:请用自定义标签中的红色255,绿色0,蓝色0,),黑体加粗,54磅。插入一版式为“项目
ExerciseCutsCancerDeathsinMenMenwhoexerciseoftenarelesslikelytodiefromcancerthanthosewho(51)newresearchpubl
最新回复
(
0
)