首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean If a<2Then
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean If a<2Then
admin
2017-03-26
70
问题
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。
Function prime(a As Integer)As Boolean
Dim k As Integer,isprime As Boolean
If a<2Then
isprime=False
Else
isprime=True
k=2
Do While k<a/2And isprime
If a Mod k=0Then
isprime=False
Else
k=k+1
End If
Loop
End If
prime=isprime
End Function
在测试时发现有1个非素数也被判断为素数,这个错判的数是( )。
选项
A、0
B、1
C、4
D、6
答案
C
解析
本题考查循环的运行。如果输入的数据小于2,那么肯定不是素数,更改isprime的值为False。如果数据大于等于2,当等于2时,isprime为True,同时k<a/2不成立,a为2时为素数,当a为4时,k<2不成立,则误判断4也是素数,因此不符合素数的定义。
转载请注明原文地址:https://kaotiyun.com/show/QmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
改变驱动器列表框的Drive属性值将引发卫士事件。
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回FalseFunctionprime(aAsInteger)AsBooleanDimkAsInteger,ispfimeAsBooleanIfa<2Then
窗体的属性可在属性窗口中设置,也可在程序中用【】语句动态设置。
以下关于菜单的叙述中,错误的是_________。
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:OptionBase0PrivateSubCommand1_Click()DimcityAsVariant
在下列文件系统控件的事件中,当文件列表框的Path属性改变时发生的事件是______。
改变驱动器列表框的Drive属性值将激活______事件。
如果要在菜单中添加一个分隔线,则应将其Caption属性设置为
下列程序运行后,在窗体上打印的结果是【】。PrivateSubtest(a,b,c)a=a+1:b=b+2:C=C+3EndSubPrivateSubCommand1
窗体上有一个名称为Commandl的命令按钮,其单击事件过程及有关函数过程如下:PrivateSubCommandlClick()DimnAsIntegern=add(5,10)PrintnEndSubFunct
随机试题
急性肾小球肾炎患儿使用青霉素治疗,其目的是
关于伪造、变造、买卖、出租、出售药品经营许可证法律责任叙述错误的是()。
估计某病流行势态的指标是()。
背景材料:某高速公路施工合同段在建设单位、设计单位、施工单位、监理单位的共同努力下,施工单位精心组织施工,按质按量如期完成工程合同,符合交工验收条件后,经监理工程师同意,施工单位向项目法人提出了交工验收申请。问题:交工验收有哪些主要工作内容?
下列有关信息技术对审计过程的影响的相关提法中,不正确的是()。
自2006年《烟草控制框架公约》在中国正式生效,烟草界与控烟界过招已数百回合,双方_______的是,均将视线集中于青年群体。烟草依赖的形成是一个长期的过程,烟草界企图“从娃娃抓起”;控烟界也将青年时期作为吸烟行为的萌芽阶段,向青少年大力宣传烟草的危害。
据记载,中国在夏商时期就已经出现了专门的教育机构。明清时期,()取代了太学,成为最高学府。
维新派著书立说,下列属于康有为撰写的著作是()
下面是关于PC机串口(COM1、COM2)、USB接口和IEEE-1394接口的叙述,正确的是
Forthispart,youareallowed30minutestowriteanessayonwhystudentsshouldbeencouragedtodevelopcreativity.Youshou
最新回复
(
0
)