斐波那契数列的公式是什么啊，比如就是第n项用带n的公式表示？ 在数学上，斐波那契数列以如下被以递推的方法定义：F(1)=1，F(2)=1，F(n)=F(n-1)+F(n-2)（n>；=3，n∈N*）。斐波那契数列（Fibonacci sequence），又称黄金分割数列、因数学家列昂纳多·斐波那契（Leonardoda Fibonacci）以兔子繁殖为例子而引入，故又称为“兔子数列”，指的是这样一个数列：1、1、2、3、5、8、13、21、34、…如果设F(n）为该数列的第n项（n∈N*），那么这句话可以写成如下形式：F(n)=F(n-1)+F(n-2)，显然这是一个线性递推数列。扩展资料：斐波那契数列的定义者，是意大利数学家列昂纳多·斐波那契（Leonardo Fibonacci），生于公元1170年，卒于1250年，籍贯是比萨。他被人称作“比萨的列昂纳多”。1202年，他撰写了《算盘全书》（Liber Abacci）一书。他是第一个研究了印度和阿拉伯数学理32313133353236313431303231363533e59b9ee7ad9431333431373838论的欧洲人。他的父亲被比萨的一家商业团体聘任为外交领事，派驻地点于阿尔及利亚地区，列昂纳多因此得以在一个阿拉伯老师的指导下研究数学。他还曾在埃及、叙利亚、希腊、西西里和普罗旺斯等地研究数学。另外斐波纳希还在计算机C语言程序题中应用广泛。参考资料来源：—斐波那契数列
VB里 用数组的知识编写程序求斐波那契数列第N项的值 谢谢了 Option Base 1Dim a()Private Sub Command1_Click()n=Val(InputBox(\"输入N的值道\"，\"求斐回波那契数列答第N项的值\"))ReDim a(n)a(1)=1：a(2)=1For i=3 To na(i)=a(i-1)+a(i-2)NextPrint\"第；n；项的值是：；a(n)End Sub
用VB打印斐波那契数列的前N项，要求在文本框中给出n的值，当n大于20时提示重新输入信息，结果显示列表框 Private Function F(N As Long)As LongIf N>；2 ThenF=F(N-1)+F(N-2)ElseF=1End IfEnd FunctionPrivate Sub Command1_Click()ClsDim N As Long，I As Long，sum As Longsum=0N=Val(Text1.Text)if n>；20 thenmsgbox\"请重新输入exit functionend ifFor I=1 To Nprint F(I)Next IEnd Sub
