有一个数列,它的前3个数为0,1,1,此后的每个数都是其前面3个数之和,即0,1,1,2,4,7,13,24,… 要求编写程序输出该数列中所有不超过1000的数。 某人编写程序如下: Private Sub Form. Click( ) Dim i As Intender,a As Integer,b As Integer Dim C As Integer,d As Integer a=0:b=1:c=1 d=a4-b4-c i=5 While d<=1C00 Print d; a=b:b=c:c=d d

题目

有一个数列,它的前3个数为0,1,1,此后的每个数都是其前面3个数之和,即0,1,1,2,4,7,13,24,… 要求编写程序输出该数列中所有不超过1000的数。 某人编写程序如下: Private Sub Form. Click( ) Dim i As Intender,a As Integer,b As Integer Dim C As Integer,d As Integer a=0:b=1:c=1 d=a4-b4-c i=5 While d<=1C00 Print d; a=b:b=c:c=d d=a+b+c i=i+1 Wend End Sub 运行上面的程序。发现输出的数列不完整,应进行修改。以下正确的修改是( )。

A.把While d<=1000改为while d>1000

B.把i=5改为i=4

C.把i=i+1移到While d<=1000的下面

D.在i=5的上面增加一个语句:Print a;b;C;


相似考题
更多“有一个数列,它的前3个数为0,1,1,此后的每个数都是其前面3个数之和,即0,1,1,2,4,7,13,24,… 要求编 ”相关问题
  • 第1题:

    有4个数,前3个数成等差数列,后3个数成等比数列,且第一个数与第四个数之和是16,第二个数和第三个数之和是12,则这4个数的和为( )

    A.42
    B.38
    C.28
    D.32
    E.34

    答案:C
    解析:
    设第一个数为x,则第四个数为16-x,设第二个数为y,则第三个数为12-y。

  • 第2题:

    求斐波那契(Fobonacci)数列的前40个数。这个数列有如下特点:第1、2个数均为1,从第3个数开始,每个数均是前两个数之和。问该数列的前40个数各是多少? 提示:每行输出5个数据,每个数据输出宽度为12个字符。


    每一项等于前两项之和

  • 第3题:

    已知Fibonacci数列是1,1,2,3,5,8,13,...,即从第3个数开始,每个数都是前两个数的和。则Fibonacci数列前25个数之和是________。

    A.121392

    B.196417

    C.75024

    D.317810


    12586269025

  • 第4题:

    有一个数列,它的第一项为0,第二项为1,以后每一项都是它的前两项之和,试产生该数列的前20项,并按逆序显示出来。


    C

  • 第5题:

    已知Fibonacci数列是1,1,2,3,5,8,13,...,即从第3个数开始,每个数都是前两个数的和。Fibonacci数列的第15个数是________。

    A.377

    B.610

    C.987

    D.1597


    #include <stdio.h>
    main()
    { int i;
    int f[20]={1,1};
    for(i=2;i<20;i++)
    f[i]=f[i-2]+f[i-1];
    for(i=0;i<20;i++)
    { if(i%5==0) printf("
    ");
    printf("%12d",f[i]);
    }
    }