有一个数列，它的前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 IntegerDim C As Integer，d As Integera=0：b=1：c=1d=a4-b4-ci=5While d<=1C00Print d；a=b：b=c：c=dd=a+b+ci=i+1W
题目
有一个数列，它的前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题：
Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即1，1，2，3，5，8，13，2l，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 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
正确答案：C
解析：本题中程序思路是利用for循环求得斐波那契数列，然后和x比对，若x是斐波那契数列中的值，则返回布尔值True，若不是则返回false。题目源程序中循环条件是x<b，又因为a、b初始值都是1，而x是正整数，所以不论x取何值，循环都不会执行。 -
第2题：
斐波那数列的特征是（ ）。
A．数列中任一数字都由其相邻的两个数字之和构成
B．前一个数字与相邻的后一个数字相比，其比率趋于一个常数
C．任一数字与其相邻的前第二个数字相比，其比率趋于0.382
D．任一数字与其相邻的第二个数字相比，其比率趋于2.618
E．以上都不对
正确答案：CD任一数字与其相邻的前第二个数字相比，其比率趋于2.618；任一数字与其相邻的第二个数字相比，其比率趋于0.382。 -
第3题：
一个等差数列，它的开始四项之和为70，最后四项之和为10，所有项的和为640，则这个数列一共有( )项。
A、 56 B、 60 C、 64 D、 72
因为前四项之和为40，最后四项之和为80 所以a1+an=(40+80)/4=30 Sn=n(a1+an)/2=30n/2=210 n=14
-
第4题：
一个等差数列，它的开始四项之和为70，最后四项之和为10，所有项的和为640，则这个数列一共有（ ）项。
A、 56
B、 60
C、 64
D、 72
正确答案：C
C 解析：由等差数列的性质可知，等差数列的和为项数乘以平均数。本题中，由前四项和后四项的和，可求出平均数为(70+10)÷8=10，因此项数为 640÷10=64。故本题正确答案为C。 -
第5题：
有一列数：3，7，10，17，27，44…从第三个数起，每个数都等于它前面两个数的和，那么第1998个数除以5的余数是多少？（ ）
A. 4
B. 3
C. 2
D. 0
正确答案：D
D［解析］我们将这列数每个数分别被5除，观察余数有什么规律。
这列数每个数分别被5除所得的余数依次是：
3，2，0，2，2，4，1，0，1，1，2，3，0，3，3，1，4，0，4，4，3，2，0，2，2，4，1，0，…
从上述结果可知，余数每20个数出现一周期循环。那么有：1998÷20=99……18,而一周期中第18个数是0，所以第1998个数被5除余数是0；
-
第6题：
一列数，前3个是1，9，9，以后每个都是它前面相邻3个数字之和除以3所得的余数，这列数中的第1999个数是几?（ ）A.9
B.0
C.1
D.2答案：B解析：将这列数从前至后开始排列：1，9，9，1，1，2，1，1，1，O，2，0，2，1，0，0，1，1，…，这列数除去前面的三个数，其余每13个数为一周期。而(1999-3)÷13=153……7，周期中第7个数是0。所以选B。 -
第7题：
一个数有6个约数，其最小的3个约数之和为11，满足条件的所有数之和是多少？A.210
B.343
C.798
D.840答案：A解析：第一步，本题考查约数倍数问题。
第二步，由于1是任何数的约数，且最小的三个约数之和是11，则剩下的两个约数和为10，可能的情况有：2＋8＝10（由于8有约数4，排除）；3＋7＝10（符合）；4＋6＝10（4和6有公约数2，排除）。故3个最小的约数是1、3、7。
第三步，设这个数为A，假设它还有一个约数a，则这个数的约数可能是1，3，7，a，3a，7a，21，A。根据题意，所求数只有6个约数，则这8个约数有两组是相同的，故a=3或7。
第四步，故这个数可以是63或147，两者之和为63＋147＝210。 -
第8题：
从1、2、3、4、5中随机抽取3个数，问这3个数之和至少能被其中一个数整除的概率是多少？A. 10%
B. 30%
C. 60%
D. 90%答案：D解析：三个数中只要含有1就能满足，共C4,2=6种，三个数中含有2的话，三个数的和必须是偶数，共C3,2-1=2种，不含1和2只有3、4、5能被3整除，因此共有9种满足的情况，总数为c5,3=10，概率为9/10=90%。 -
第9题：
如图，有一个11位数，它的每3个相邻数字之和都是20，则标有*的那个数位上的数字应是几？
A.9
B.7
C.5
D.3答案：B解析：
-
第10题：
1，1995，1994，1，1993，1992，…，从第三个数起，每个数都是它前面两个数中大数减小数的差。则这列数中前1995个数的和是（）。
- A、1769565
- B、1770225
- C、1770230
- D、1769566
正确答案:C -
第11题：
有一串数：1，3，8，22，60，164，448，……；其中第一个数是1，第二个数是3，从第三个数起，每个数恰好是前两个数之和的2倍。那么在这串数中，第2000个数除以9的余数是（）。
- A、1
- B、2
- C、3
- D、4
正确答案:C -
第12题：
单选题一列数，前3个是1，9，9，以后每个都是它前面相邻3个数字之和除以3所得的余数。这列数中的第1999个数是几？（ ）A9
B0
C1
D2
正确答案： D解析：
将这列数依次排列得1，9，9，1，1，2，1，1，1，0，2，0，2，1，0，0，1，1，……除去前面的三个数，其余以每13个数为周期循环，而（1999－3）÷13＝153……7，即周期中第7个数是0。 -
第13题：
：有一列数，第1个数是35，第2个数是25，从第3个数开始，每个数都是它前面两个数的平均数。这列数的第15个数的整数部分是（ ）。
A．19
B．24
C．28
D．30
正确答案：C第3个数为(35+25)÷2=30，第4个数为(25+30)÷2=27.5，第5个数为(30+27．5)÷2=28.75，第6个数为28.125，此后每个数都小于第5个数，大于第6个数。所以第5个数的整数部分是28。因此，本题正确答案为C。
-
第14题：
有一列数：3，7，10，17，27，44，…从第三个数起，每个数都等于它前面两个数的和，那么第1998个数除以5的余数是（ ）。
A．4
B．3
C．2
D．0
正确答案：D
【解析】我们将这列数每个数分别被5除，观察余数有什么规律。这列数每个数分别被5除所得的余数依次是：3，2，0，2，2，4，1，0，1，1，2，3，0，3，3，1，4，0，4，4，3，2，0，2，2，4，1，0，…从上述结果可知，余数每20个数出现一周期循环。那么有：1998÷20＝99…18，而一个周期中第18个数是0，所以第1998个数袖5除余数是0。 -
第15题：
请在函数proc()的横线上填写若干表达式，使从键盘上输入一个整数n，输出斐波那契数列的前n个数。斐波那契数列是一个整数数列，该数列自第3项开始，每个数等于前面两个数之和，即0，1，1，2，3，5，8，13，21，34，55，…
注意：部分源程序给出如下。
请勿改动main()函数和其他函数中的任何内容，仅在函数proc()的横线上填入所编写的若干表达式或语句。
试题程序：
正确答案：【1】n==0【2】n==1【3】proc(n-1)+proc(n-2)
【解析】由斐波那契数列的定义可知，该数列中有两个特殊项。当n为0时，其值为0；当n为1时，其值为1。因此，【1】处填“n==0”；【2】处填“n==1”；当n为其他值时，为前两项的和，因此，[3]处填“proc(n-1)+proc(n-2)”。 -
第16题：
八个自然数排成一排，从第三个数开始，每个数都是它前面两个数的和，已知第五个数是7，则第八个数是（ ）。
A．11
B．18
C．29
D．47
正确答案：C
因为第五项是7，且第五项是第三、四项的和，所以第3、4项组合形式可能是1+6、6+1、2+5、5+2、3+4、4+3，然后逐项验证，可以发现：在保证第一、二项之和是第三项且各项之间没有重复数字出现的情况下，只有3+4这种情况符合要求。据此，可以推知：第六项为4+7=11，第七项为7+11=18，第八项为11+18=29。选C。 -
第17题：
已知等差数列{an}中，a1=21，Sn是它的前n项之和，S7=S15。
(1)求Sn；
(2)这个数列的前多少项之和最大 求出最大值。答案：解析：(1)设等差数列的公差为d，由题意可得：
(2)Sn=22n-n2=-(n-11)2+121，当n=11时，数列之和最大，最大值为121。 -
第18题：
1，1995，1994，1，1993，1992，…，从第三个数起，每个数都是它前面两个数中大数减小数的差。则这列数中前1995个数的和是（ ）。A.1769565
B.1770225
C.1770230
D.1769566答案：C解析：前1995个数中有1995÷3=665个1，其余的1995-665=1330个数是自然数666～1995，它们的和是(666+1995)×1330÷2=1769565，所以前l995个数的和是1769565+665=1770230。 -
第19题：
有68个数排成一排，除头为两个数外，每个数的3倍恰好等于他两边两个数之和。经分析发现，这些数除以6所得的余数以12个数为周期重复出现。已知前两个数是0和1，则该数列最后一个数除以6的余数是（）。
A. 2
B. 3
C. 4
D. 5答案：D解析：解题指导： 68/12=5余8 所以是5个周期后的第八个数 0，1，3，8，21，55，144，377 377/6=62余5，就是5。故答案为D。 -
第20题：
有4个数,前3个数成等差数列,后3个数成等比数列,且第一个数与第四个数之和是16,第二个数和第三个数之和是12,则这4个数的和为（ ）A.42
B.38
C.28
D.32
E.34答案：C解析：设第一个数为x，则第四个数为16-x，设第二个数为y，则第三个数为12-y。 -
第21题：
8个自然数按顺序排列在一起，从第3个数开始，每个数都是前面2数之和，第5个数是7，第8个数是几？（）
- A、11
- B、18
- C、29
- D、47
正确答案:C -
第22题：
如果一个数列中数的个数为偶数，中位数是位于最中间的两个数的（）
正确答案:平均数 -
第23题：
填空题如果一个数列中数的个数为偶数，中位数是位于最中间的两个数的（）正确答案： 平均数解析： 暂无解析 -
第24题：
单选题8个自然数按顺序排列在一起，从第3个数开始，每个数都是前面2数之和，第5个数是7，第8个数是几？（）A11
B18
C29
D47
正确答案： A解析： 暂无解析