首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2019-06-20
44
问题
编写如下程序:
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/Q0Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为Commandl的命令按钮数组,含三个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消”,
(1)在名称为Forml的窗体上画一个名称为lblPwd的标签,标题为“密令”;画两个文本框,名称分别为txtPwd、txtObj,都没有初始内容;再画三个命令按钮,名称分别为cmdShow、cmdHide、cmdCopy,标题分别为“显示”、“隐藏”、“
(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上有两个列表框,名称分别为List1、List2,在List2中已经预设了内容;还有两个命令按钮,名称分别为C1、C2,标题分别为“添加”、“清除”,如图2—233所示。释序的功能是在运行时,如果选中
在考生的文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图2.77(a)所示。其中“写文件”命令按钮事件过程用来建立一个通
在考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。同时,给出了窗体对象“fEmp”上的一个按钮的单击事件代码,请按以下功能要求补充设计。(1
关于菜单设计,下列叙述中错误的是()。
以下关系表达式中,其值为True的是
一个教师讲授多门课程,一门课程由多个教师讲授。则实体教师和课程间的联系是
在E—R图中,用来表示实体联系的图形是
下列关于二叉树的叙述中,正确的是()。
随机试题
温度低于一定的数值,生物便会因低温而受害,这个数值称为( )。
A.突发剑突下剧烈疼痛、阵发性伴钻顶感,间歇期无疼痛B.上腹部或右上腹部阵发加剧的持续性疼痛C.上腹部持续性剧痛,伴左肩、腰、背牵拉痛D.进食后上腹胀痛,伴呕吐E.与饮食有关的慢性周期性节律性上腹痛急性胰腺炎可出现
术后切口最常见的并发症是________、________和________。
关于乳剂型基质的正确表述为
下列四组生物中,细胞结构最相似的一组是()。
根据以下情境材料,回答下列问题。某日傍晚6时左右,民警庄某在卡点发现要追捕的抢劫犯罪嫌疑人邢某驾摩托车驶来,喝令邢某停车。听到喊声,邢某不但没有停车,反而加大油门继续行驶。庄某紧追不放,到镇里一个菜市场处,由于人群聚集,邢某停车欲逃,庄某拔出手枪
过去10年,全世界烟草销量下降2%,而Z国的烟草销量却增长21%,每年达到2.5万亿支,Z国的烟草消费总量占全世界消费总量的45%以上。下列最能对这一现象做出解释的是:
DPOB
设0<x1<3,xn+1=(n=1,2,…),证明数列{xn}的极限存在,并求此极限.
OnehundredandthirteenmillionAmericanshaveatleastonebank-issuedcreditcard.Creditcardsgivetheirownersautomaticc
最新回复
(
0
)