首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。 Function prime(a As Integer)As Boolean Dim k As Integer,isprime As Boolean
admin
2020-07-22
30
问题
某人编写如下函数来判断a是否为素数,若是,则函数返回True;否则返回False。
Function prime(a As Integer)As Boolean
Dim k As Integer,isprime As Boolean
Ifa<2 Then
isprime=False
Else
isprime=True
k=2
Do While k<a/2 And isprime
If a Mod k=0 Then
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/X5Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是()。
在面向对象的程序设计中,可被对象识别的动作称为()。
下列表达式的值为2123的是()。
下列关于菜单项的描述中,错误的是
下面关于菜单的叙述中正确的是
在考生文件夹下有一个工程文件sjt5.vbp,已给出了所有控件(如图3.62所示)和部分程序。程序运行时,请按以下顺序操作:1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Text1)中;2)单击“加密”
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
下面关于单选按钮的叙述中正确的是
下面不属于软件需求分析阶段主要工作的是
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数:")str1$=Str$(asing
随机试题
Besidesymbolism,allthefollowingqualitiesexcept______areusedtomakeMelville’sMoby-Dickaworldclassic.()
旅游动机的功能表现在()。
男,18岁,右手背部深Ⅱ度烧伤10天,近一天出现乏力、头痛及张口困难,不恰当的诊治措施是
根据国家社会经济发展长远规划,在预测分析市场或社会需求变化的基础上,制定本行业发展的指导思想、发展目标、产业政策、布局规模等的总体规划是()
背景:某市政桥梁工程,总包方A市政公司将钢梁安装工程分包给B安装公司。总包方A公司制定了钢梁吊装方案并得到监理工程师的批准。由于工期紧,人员紧缺,B公司将刚从市场招聘的李某与高某经简单内部培训组成吊装组。某日清晨,雾气很浓,能见度较低,吊装组就位,准
如果初始的美元兑人民币的汇率为8,美国的年通货膨胀率为5%,而中国的年通货膨胀率为10%,那么按照相对购买力平价理论,美元兑人民币汇率变为()
下列关于金银首饰零售环节缴纳消费税的说法中正确的有()。
国家鼓励自然人、法人或其他组织自愿无偿向公益性团体、公益性非营利的事业单位捐赠财产,用于公益事业。以下属于非营利公益事业事项的是()。
Moviegoersmaythinkhistoryisrepeatingitselfthisweekend.Thesummer’smostanticipatedfilm,PearlHarbor,whichhasopene
Whatwillthemandonext?
最新回复
(
0
)