首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写如下函数来判断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
60
问题
某人编写如下函数来判断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全国计算机二级
相关试题推荐
VB的数值型数据分为()两种。
设置定时器控件的Interval属性为2000,Enabled属性为True,并且有下面的事件过程,程序运行时计算机将发出()次Beep声。SubTimer1_Timer()BeepEndSub
有三个关系R.S和T如下:则由关系R和s得到关系T的操作是()。
(1)在考生文件夹下有一个工程文件sit3.vbp。程序的功能是通过键盘向文本框中输入正整数。在“除数”框架中选择一个单选按钮,然后单击“处理数据”按钮,将大于文本框中的正整数且能够被所选除数整除的5个数添加到列表框Ifistl中,如图3-23所示。在窗体
下面不属于软件需求分析阶段主要工作的是
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示"打开"对话框时,希望在该对话框的"文件类型"栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为( )。
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数:")str1$=Str$(asing
(1)在考生文件夹下有一个工程文件sit3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的0~999之间的100个整数读入数组a中:②单击“计算”按钮,则找出这100个整数巾所有水仙花数,并将它们的最大值与最小值分别显示
下面不属于软件需求分析阶段主要工作的是
对下列二叉树进行前序遍历的结果是
随机试题
尿道前列腺部
肺痈咳吐脓痰,当首选
工业企业建设项目的“三同时”是指安全、防护、设施与主体工程
下列对于肝素的叙述,错误的是()。
下列哪些情形当事人不可以向法院申请撤销仲裁裁决:()
建设工程施工安全控制的具体目标包括()。
计算设备、工具、器具购置投资额时,自行建造的设备按建造过程中实际发生的全部支出计算。()[2013年初级真题]
情感教育是指教育者的教育态度与行为必须在少年心中引起积极的情绪反应。它没有固定的模式,几乎包括所有的教育手段,也包括严格、纪律甚至惩罚。也不完全等同爱的教育,而是具有明显的操作性。这段文字主要支持这样一种观点,即情感教育:
Itneveroccurredtohimthatheandhisdoingwerenotofthemostintenseandfascinatinginteresttoanyonewithwhomhecame
TheInternetisaninternationalcollectionofcomputernetworksthatallunderstandastandardsystemofaddressesandcommands
最新回复
(
0
)