Petitverse

ちなみにフィボナッチ数を求める方法は4つほどあって、その中の一つがDPです。DPは本来とても難しいテクニックですが、フィボナッチとかは比較的易しくて取っ掛かりやすいと思います。
ちなみに残りの3つはこんな感じ。
1つ目
定義通り(一番遅い)
DEF F(N)
　IF N==0 THEN RETURN 0
　IF N==1 THEN RETURN 1
　RETURN F(N-1)+F(N+1)
END
INPUT "",N
PRINT F(N)

2つ目 メモ化(正確にはメモ化はDPの一種)
DIM A[1000] 'メモ用配列
DEF F(N)
　IF A[N]!=-1 THEN RETURN A[N]
　A[N]=F(N-1)+F(N+1)
　RETURN A[N]
END
FILL A,-1 '配列初期化
A[0]=0
A[1]=1
INPUT "",N
PRINT F(N)

3つ目 行列(一番速いけどめっちゃ難しい)
フィボナッチ数は行列と呼ばれるものの累乗で表現することが出来ます。
そして、累乗を高速に計算する方法があります。
例えば、6の8乗は
A=6*6*6*6*6*6*6*6
と計算するより、
A=6*6
A=A*A '4乗
A=A*A '8乗
と計算する方が、少ない計算で済んだりします。
同じように6の10乗を計算するには、
A=1
B=6*6
A=A*B
B=6*6 '4乗
B=6*6 '8乗
A=A*B '6の8乗*6の2乗で6の10乗
と計算すると高速です。
(pow()で良くね？)

続き
これと同じことを行列でやるとフィボナッチ数を高速に計算できます。
公開キー[DT4EE4V]
の中の
BLOOD_FIB
がその方法で計算してます。