首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
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
2019-03-14
25
问题
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,bAs Integer,c As Integer,flagAs Boolean
flag=False
a=1:b=1
Do While x
C=a+b:a=b:b=c
Ifx==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
D、把If x=b Then flag=True改为If x=a Then
flag=True
答案
C
解析
在本题中通过分析题干中的程序可以看出,函数的返回值就是变量flag的值。错误现象是无论输入哪个正整数均会返回False,这就代表着没有执行循环,直接输出的就是变量flag的初值False。进一步分析可以看出,由于b的初值为1,而任何正整数均不会小于1,所以永远无法满足循环条件从而进入循环,因此需要将条件x
b。
转载请注明原文地址:https://jikaoti.com/ti/cMm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下不属于VB控件的是
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=strL
以下关于事件、事件驱动的叙述中,错误的是( )。
以下叙述中正确的是( )。
有如下过程代码:Subvar_dim() StaticnumaAsInteger DimnumbAsInteger numa=numa+2 numb=numb+1 printnuma;numbEndSub连续3次
考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Text1、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件灾下的in5.dat文件中
下列针对框架控件的叙述中,错误的是
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommandlClick()循环1Fori=1To3Forj=1To4b(i,i)=a(i,j
下列循环能正常结束的是()。
随机试题
当横梁移动式龙门铣床的工作台宽度不大:1250mm时,铣床一般有()个铣头。
患者,58岁。因工作需要,拔牙后半个月即做了全口义齿修复。戴牙后半年,因进食时食物塞入基托组织面无法忍受而就诊
护理肺炎患儿应采取的措施是
进口转关运输时,采用提前报关方式报关应于电子数据申报之日起()内,向进境地海关办理转关手续。
投资项目中的项目总投资包括()。
长寿:年龄
设则
Decidewhichofthechoicesgivenbelowwouldbestcompletethepassageifinsertedinthecorrespondingblanks.Formanype
Heisasolemnperson______temperamentsoit’sextremelyhardtomakehimsmile,letalone______.
A.serveB.sponsoredC.profitsD.principlesE.developingF.understandG.bills
最新回复
(
0
)