已知斐波那契數列定義如下:f(1)= 1f(2)= 1f(n)= f(n-1)+f(n-2)(n >:2)求斐波那契:數列的第18項。

Dim f(100)壹樣長

f(1) = 1

f(2) = 1

打印1；f(1)

打印2；女(2)

對於i = 3到18

f(i) = f(i - 1) + f(i - 2)

打印I；f(壹)

然後

末端接頭

運算結果:f (18) = 2854。