vb程序设计课后答案:请问“求Fibonacci数列的前20个数.Fibonacci数列的特征是:第1个数和第二个数都是1,从第三个数开始,该数是前两个数之和,即f(1)=1,f(2)=1,当n>=3时,f(n)=f(n-1)+f(n-2)这个题怎么做?
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/28 17:34:37
![vb程序设计课后答案:请问“求Fibonacci数列的前20个数.Fibonacci数列的特征是:第1个数和第二个数都是1,从第三个数开始,该数是前两个数之和,即f(1)=1,f(2)=1,当n>=3时,f(n)=f(n-1)+f(n-2)这个题怎么做?](/uploads/image/z/14413607-71-7.jpg?t=vb%E7%A8%8B%E5%BA%8F%E8%AE%BE%E8%AE%A1%E8%AF%BE%E5%90%8E%E7%AD%94%E6%A1%88%3A%E8%AF%B7%E9%97%AE%E2%80%9C%E6%B1%82Fibonacci%E6%95%B0%E5%88%97%E7%9A%84%E5%89%8D20%E4%B8%AA%E6%95%B0.Fibonacci%E6%95%B0%E5%88%97%E7%9A%84%E7%89%B9%E5%BE%81%E6%98%AF%EF%BC%9A%E7%AC%AC1%E4%B8%AA%E6%95%B0%E5%92%8C%E7%AC%AC%E4%BA%8C%E4%B8%AA%E6%95%B0%E9%83%BD%E6%98%AF1%2C%E4%BB%8E%E7%AC%AC%E4%B8%89%E4%B8%AA%E6%95%B0%E5%BC%80%E5%A7%8B%2C%E8%AF%A5%E6%95%B0%E6%98%AF%E5%89%8D%E4%B8%A4%E4%B8%AA%E6%95%B0%E4%B9%8B%E5%92%8C%2C%E5%8D%B3f%281%29%3D1%2Cf%282%29%3D1%2C%E5%BD%93n%3E%3D3%E6%97%B6%2Cf%28n%29%3Df%28n-1%29%2Bf%28n-2%29%E8%BF%99%E4%B8%AA%E9%A2%98%E6%80%8E%E4%B9%88%E5%81%9A%3F)
vb程序设计课后答案:请问“求Fibonacci数列的前20个数.Fibonacci数列的特征是:第1个数和第二个数都是1,从第三个数开始,该数是前两个数之和,即f(1)=1,f(2)=1,当n>=3时,f(n)=f(n-1)+f(n-2)这个题怎么做?
vb程序设计课后答案:请问“求Fibonacci数列的前20个数.Fibonacci数列的特征是:第1个数和第二个数都是1
,从第三个数开始,该数是前两个数之和,即f(1)=1,f(2)=1,当n>=3时,f(n)=f(n-1)+f(n-2)这个题怎么做?
vb程序设计课后答案:请问“求Fibonacci数列的前20个数.Fibonacci数列的特征是:第1个数和第二个数都是1,从第三个数开始,该数是前两个数之和,即f(1)=1,f(2)=1,当n>=3时,f(n)=f(n-1)+f(n-2)这个题怎么做?
回答过了啊……
Dim f1,f2,f3 As Long
Dim i,j As Integer
f1 = 1
f2 = 1
j = 3 'j用来控制print和换行
Print "====输出Fibonacci数列20个数===="
Print
Print f1,f2,
For i = 3 To 20
f3 = f1 + f2
If j < 4 Then
Print f3,
Else
j = 0
Print f3
End If
f1 = f2
f2 = f3
j = j + 1
Next i