Fibonacci sequence: Difference between revisions
→Iterative
Space Ghost (talk | contribs) |
Space Ghost (talk | contribs) |
||
Line 7,035:
=== Iterative ===
<syntaxhighlight lang="haskell">
import File from "sys/file"
let fib = j => {
let mut fnow = 0, fnext = 1
for (let mut n = 0; n <= j; n += 1) {
if (n == 0 || n == 1) {
let output1 =
ignore(File.fdWrite(File.stdout, output1))
} else {
let tempf = fnow + fnext
fnow = fnext
fnext = tempf
let output2 =
ignore(File.fdWrite(File.stdout, output2))
}
| |||