Generation of Fibonacci Numbers According to Definition


$stack 32766
cls
def fnfib(n)
if (n=1) or (n=2) then fnfib=1 :exit def else fnfib=fnfib(n-1)+fnfib(n-2)
end def
while not instat
k=k+1
?fnfib(k)
wend