8 lines
206 B
Text
8 lines
206 B
Text
\ Fibonacci numbers (iterative, with tuples)
|
|
main (parms):+
|
|
lim =: string parms[1] as integer else 100
|
|
fp =: 0, 1
|
|
?# i =: from 1 upto lim
|
|
print i, fp.1
|
|
fp =: fp.2, fp.1 + fp.2
|
|
print i, fp.2
|