斐波那契数列求第n项 用C语言编程,编一个求Fibonacci数列前n项和程序?
用C语言编程,编一个求Fibonacci数列前n项和程序?PrivateFunctionF(nAsLong)AsLongIfn>2ThenF=F(n-1)F(n-2)ElseF=1EndIfEnd
用C语言编程,编一个求Fibonacci数列前n项和程序?
PrivateFunctionF(nAsLong)AsLong
Ifn>2Then
F=F(n-1)F(n-2)
Else
F=1
EndIf
EndFunction
PrivateSubCommand1 Click()
dimaasstring
dimiaslong
dimsumaslong
a=InputBox(“input Fibonacci sequence item number”,“input”
n=CLng(a)
CLS
forI=1ton
sum=sum f(I)
next
print”front of Fibonacci sequence“CSTR(n)”item sum:“sum
endsub
(1/√5)*{[(1√5)/2]^n-[(1-√5)/2]^n这是Fibonacci sequence的通式。得到差分方程的Z变换。计算前n项之和非常简单
Sn=a(n2)-1。
an=(1/√5)×{[(1+√5)/2]^n-[(1-√5)/2]^n}。
因此,Sn=(1/√5)×{[(1+√5)/2]^(n2)-[(1-√5)/2]^(n2)}-1
注意:n是正整数。