怎么用fou循环打印出费波纳契数列前20项啊 书上给的好多地方都看不懂 求大佬

可以去C++版块问问

跑错片场了。。。

给出vfp代码如下：

CLEAR
FOR i=1 TO 20
    ?fx(i)
ENDFOR

FUNCTION fx
PARAMETERS num
ON ERROR cancel
IF num=1 OR num=2
    nreturn=1
ENDIF
IF num>2
    nreturn=fx(num-1)+fx(num-2)
ENDIF
RETURN nreturn   
ENDFUNC

上面这段递归代码运行好像比较慢，可以用下面一段代码，运行速度快多了。

PARAMETERS n
clea
n=20
DIMENSION sz(n)
FOR i=1 TO n
    IF i<3
        sz(i)=1
    ELSE
        sz(i)=sz(i-1)+sz(i-2)
    ENDIF
ENDFOR
FOR j=1 TO n
    ?sz(j)
ENDFOR 

还可以更简洁：
local a,b,i
STORE 1 TO a,b
FOR i=1 to 10   
    ?a,b
    a=b+a
    b=a+b         
endfor

上面这段好像只能实现偶数个数，不能实现奇数个数。因此还可以优化，让它速度更快，占用内存更少：
local a,b,c,i
a=0
b=1
c=1
FOR i=1 to 20
    ?c
    c=a+b   
    a=b
    b=c
ENDFOR

看样子把它吃透了！

因为首先想到的是用递归方法，可没想到运行速度奇慢。就琢磨着怎么改进算法，提高运行速度！

b=1
a=0
FOR i=1 TO 10   
    i=a+b
    ?i
    STORE i TO  (IIF(a>b,"b","a"))
ENDFOR