Anonymous user
Fibonacci n-step number sequences: Difference between revisions
m
→{{header|Icon}} and {{header|Unicon}}
No edit summary |
|||
Line 765:
Works in both languages:
<lang unicon>procedure main(A)
every writes("F2:\t"|right((fnsGen(1,1))\
every writes("F3:\t"|right((fnsGen(1,1,2))\
every writes("F4:\t"|right((fnsGen(1,1,2,4))\
every writes("Lucas:\t"|right((fnsGen(2,1))\
every writes("F?:\t"|right((fnsGen!A)\14,5) | "\n")
end
Line 782 ⟶ 783:
Output:
<pre>
->fns 3 1 4 1 5
F2: 1
F3: 1
F4: 1
Lucas: 2
F?: 3 1 4 1 5 14 25 49 94 187 369 724 1423 2797
->
</pre>
|