lama_byterun/regression/test030.expr
2018-04-25 01:06:18 +03:00

14 lines
No EOL
170 B
Text

fun fib (n) {
if n <= 1
then return 1
else
return fib (n-1) + fib (n-2)
fi
}
n := read ();
for i := n, i >= 1, i := i-1 do
write (i);
write (fib (i))
od