首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即:1,1,2,3,5,8,13,21,34,55,89,…。某人编写了下面的函数,判断大于1的整数x是否是Fibonacci数列中的某个数,若是,则返回True,否则返
Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即:1,1,2,3,5,8,13,21,34,55,89,…。某人编写了下面的函数,判断大于1的整数x是否是Fibonacci数列中的某个数,若是,则返回True,否则返
admin
2017-03-26
53
问题
Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即:1,1,2,3,5,8,13,21,34,55,89,…。某人编写了下面的函数,判断大于1的整数x是否是Fibonacci数列中的某个数,若是,则返回True,否则返回False。
Function Isfab(x As Integer)As Boolean
Dim a As Integer,b As Integer,c As Integer,
flag As Boolean
flag=False
a=1:b=1
Do、Whhile x<b
c=a+b:a=b:b=C
If x=b Then flag=True
Loop
Isfab=flag
End Function
测试时发现对于所有正整数x,函数都返回False,程序需要修改。下面的修改方案中正确的是( )。
选项
A、把a=b与b=c的位置互换
B、把c=a+b移到b=c之后
C、把Do While x<b改为Do While x>b
D、把If x=b Then flag=True改为If x=a Then flag=True
答案
C
解析
在本题中通过分析题干中的程序可以看出,函数的返回值就是变量flag的值。错误现象是无论输入哪个正整数均会返回False,这就代表着没有执行循环,直接输出的就是变量flag的初值False。进一步分析可以看出,由于b的初值为1,而任何正整数均不会小于1,所以永远无法满足循环条件从而进入循环,因此需要将条件x<b改为x>b。
转载请注明原文地址:https://www.kaotiyun.com/show/p2Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
按照“先进先出”组织数据的数据结构是()。
数据的逻辑结构有线性结构和______两大类。
下列程序段的执行结果为______。A=0:B=0ForI=-1To-2Step-1ForJ=1To2B=B+1NextJA=A+1
要使标签能够显示所需要的文本,则在程序中应设置()属性的值。
表达式"12345"<>"12345"&"ABC"的值是______。
结构化程序设计主要强调的是______。
VB6.0集成开发环境可以()。
下列关于复选框的说法,正确的是()。
下列叙述中,不属于软件需求规格说明书的作用的是
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是______。
随机试题
25岁,女性,婚后2年同居,性生活正常,未孕来诊。14岁初潮,月经稀发3~6个月1次,量少,20岁后出现闭经,雌一孕激素替代出现月经。自诉小学时高于大部分同学,初中后矮于大部分同学,比多数女同学有力量。皮肤较黑,男性体态,体毛较多,喉结明显,嗓音男性,体格
A.5~2.0cm2B.≤2.0cm2C.≤1.5cm2D.≤1.0cm2E.2.0~2.5cm2出现跨瓣压差时主动脉瓣狭窄面积在
A.嗜碱性中幼粒细胞B.早幼粒细胞C.小淋巴细胞D.中性中幼粒细胞E.嗜酸性中幼粒细胞胞浆淡红色,充满粗大、均匀形如小珠的橘红色颗粒
女,46岁。体态肥胖,间断性出现右上腹痛并向右背部放射1年,似与进油腻饮食有关,体格检查无显著征。应常规首选下列何种检查
下列不是行政复议机关特征的是()。
证券业协会是证券业的自律性组织,是()。
下列关于缓刑的适用的说法中,错误的是()。
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象“tStud”和“tTemp"。tStud表是学校历年来招收的学生名单,每名学生均有身份证号。对于现在正在读书的“在校学生”,均有家长身份证号,对于已经毕业的学生,家长身份证号为
请在“答题”菜单中选择相应的命令,并按照题目要求完成下面的操作。注意:以下的文件必须保存在考生文件夹下。王芳负责本公司的销售统计工作,此次需要对各分店的前4季度的销售情况进行统计分析,并将结果提交给部门经理。打开“图书销售情况表.xlsx”,帮助王芳
Wheredidtheconversationtakeplace?
最新回复
(
0
)