black

登录

单项选择题

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=I
  Do While 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

相关考题

单项选择题 在窗体上画一个命令按钮(其名称为Commandl),然后编写如下代码:   Private Sub Command l_Click()   Dim a   a=Array(1,2,3,4)   I=3:j=1   Do While i>=0   s=s+a(i)*j   i=i-1   j=j*10。   Loop   Print s   End Sub   运行上面的程序,单击命令按钮,则输出结果是()

单项选择题 有如下事件过程:   Private Sub Form Click()   Dim n A s Integer   x=0   n=InputBox("请输入一个整数”)   For i=1 Ton   For j=1 To i   x=x+I   Next j   Next i   Print x   End Sub   程序运行后,单击窗体,女口果在输入对话框中输入:,则在窗体上显示的内容是()

单项选择题 以下程序段的输出结果是()   x=I   y=4   Do Until y>4   x=x*y   Y=y+I   Loop   Print x

All Rights Reserved 版权所有©计算机考试题库(jsjtiku.com)

备案号:湘ICP备14005140号-4

经营许可证号:湘B2-20140064