求数列1,1,2,3,5,8……前20项之和 的VB编程

用C语言编程输出数列1,1,2,3,5,8,13,21的前20 项~

这个问题所输出的数列叫Fibonacci数列
是一个有趣的古典数学问题
来源:
有一对兔子,从出生后第3个月起每一个月都生一对兔子。小兔子长到第3个月后每个月又生一对兔子。假设所有的兔子都不死,问每个月的兔子总数为多少?

也就是说
后一个数是前2个数的和

测试系统 Turbo c 3.0

#include
void main()
{
int f1,f2;
int i;
f1=1;f2=1;
for(i=1;i<=10;i++)
{
printf("%d,%d",f1,f2);
if(i%2==0)
printf("
");
f1=f1+f2;
f2=f2+f1;
}
}
/*当i为偶数时换行,由于i增加1,输 出2个数,每隔2换一次行,当于每输出4个数字后换行*/

如果偶编写的程序有错,请指明,相互学习嘛,呵

Dim k1 As Long, k2 As Long, k As Long, s As Long, i As Integer
k1 = 1
s = 1
For i = 1 To 20
Print k1;
k = k1 + k2
s = s + k
k2 = k1
k1 = k
Next
Print
Print "前20项之和为" & s

在窗体上先放置一个按扭,然后对它进行编写
Private Sub Command1_Click()
Dim s(1 To 20) As Integer
Dim sum As Integer
s(1) = 1
s(2) = 1
sun=s(1)+s(2)
For i = 3 To 20
s(i) = s(i - 1) + s(i - 2)
sum = sum + s(i)
Next
Print sum
End Sub

Private Sub Command1_Click()
i = 0
a = 1
b = 1
Sum = 2
s = "1+1"
Do While i < 18
Sum = Sum + a + b
tmp = a + b
a = b
b = tmp
s = s & "+" & tmp
i = i + 1
Loop

Print s & "=" & Sum
End Sub

Private Sub Command2_Click()
Dim i As Integer
Dim l As Integer
Dim a(1 To 20) As Integer
Dim sum As Integer
a(1) = 1
a(2) = 1
For i = 3 To 20
a(i) = a(i - 1) + a(i - 2)
Next
For l = 1 To 20
print a(l)
Next
End Sub

Private Sub Form_Click()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim s As Integer
a = 1
b = 1
s = 2
For i = 3 To 20
Print a; "+";
c = a + b
s = s + c
a = b
b = c
Next i
Print a; "+"; b; "=";
Print s
End Sub

求数列1 ,1,2,3,5,8,,,。的 通项
答:F(0) = 0,F(1)=F(2)=1,F(n)=F(n-1)+F(n-2) (n≥3)显然这是一个线性递推数列。通项公式的推导方法一:利用特征方程 线性递推数列的特征方程为:X^2=X+1 解得 X1=(1+√5)/2,,X2=(1-√5)/2 则F(n)=C1*X1^n + C2*X2^n ∵F(1)=F(2)=1 ∴C1*X1 + C2...

1,1,2,3,5,8...有规律吗有的话写出来
答:根据1,1,2,3,5,8可得:(1)1+1=2 (2)1+2=3 (3)2+3=5 (4)3+5=8 于是可得:后一个数等于它前面的两个数的和。

1,1,2,3,5,8这组数列叫什么?
答:1 1 2 3 5 8 13 21……从数学上,该数列也是可以推导出通项公式的,其通项公式推导如下:(An+1)=(An)+(An-1),将An项分解为(((1+√5)/2)+((1-√5)/2))(An),然后移项,得到下式:(An+1)-((1+√5)/2)(An)=((1-√5)/2)(An)+(An-1)即(An+1)-((1+√5)/2)...

1,1,2,3,5,8…… 这是什么数列?
答:即:1+1=2 ; 1+2=3 ; 2+3=5;所以后面括号为前面两项相加:3+5=8;5+8=13 数列整体为:1, 1, 2, 3, 5, (8), (13)2、这是一个斐波那契数列 斐波那契数列指的是这样一个数列:1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, ......

1,1,2,3,5,8这组数列叫什么
答:菲波那契数列,又叫兔子数列,每个数等于前两个之和。

1,1,2,3,5,8(),(),(),()二年级找规律填数
答:规律:从第三项开始,每一项为前两项的和。1,1,2,3,5,8(13),(21),(34),(55)

1,1,2,3,5,8.写出通式
答:1,1,2,3,5,8,13,21,.谁能往下写得多,谁聪明,这个智力游戏当时十分流行,这个数列就称为斐波那契数列,后来,斐波那契给出了这个数列的递推公式:a1=1,a2=1,a(m+2)=a(m+1)+am,(m≥1,m∈Z)后来人们想找到数列的通项公式,但很久未成功,直到二百多年后,法国数学家比内终于得出了通项公式:a...

1,1,2,3,5,8,13,21,34是什么数列
答:斐波那契数列,又称黄金分割数列,指的是这样一个数列:0、1、1、2、3、5、8、13、21、34、……在数学上,斐波纳契数列以如下被以递归的方法定义:F(0)=0,F(1)=1,F(n)=F(n-1)+F(n-2)(n≥2,n∈N*)在现代物理、准晶体结构、化学等领域,斐波纳契数列都有直接的应用,为此,...

1,2,3,5,8,(),(),34.有什么规律
答:裴波那契数列:1,1,2,3,5,8,13,。。。裴波那契数列递推公式:F(n+2) = F(n+1) + F(n)F(1)=F(2)=1。它的通项求解如下:F(n+2) = F(n+1) + F(n) => F(n+2) - F(n+1) - F(n) = 0 令 F(n+2) - aF(n+1) = b(F(n+1) - aF(n))展开 F...

1 1 2 3 5 8 13 21是什么数列?
答:1、1、2、3、5、8、13、21是递增数列,也是累加数列,通项公式是an=a(n-1)+a(n-2),n大于等于3。解题:1、2=1+1 2、3=2+1 3、5=3+2 4、8=5+3 5、13=8+5 6、21=13+8 如果需要填写下一位数值,即可用13+21=34,求得此数值。找规律技巧1、递增题型的特点主要是数字和...

IT评价网,数码产品家用电器电子设备等点评来自于网友使用感受交流,不对其内容作任何保证

联系反馈
Copyright© IT评价网