17 lines · 249 B · Text
RawDownload
100 let n=32110 gosub 200120 print "fibonacci(",n,") = ", m130 end 200 let c=n210 let b=1220 if c<2 then goto 400230 let c=c-1240 let a=1300 let c=c-1310 let d=a+b320 let a=b330 let b=d+1340 if c<>0 then goto 300400 let m=b410 return