lama_byterun/regression/test030.expr

14 lines
172 B
Text
Raw Normal View History

2018-04-03 07:21:59 +03:00
fun fib (n) {
if n <= 1
then return 1
else
2019-04-10 22:15:08 +03:00
return (fib (n-1) + fib (n-2))
2018-04-03 07:21:59 +03:00
fi
}
2018-04-25 01:06:18 +03:00
n := read ();
2018-04-03 07:21:59 +03:00
for i := n, i >= 1, i := i-1 do
write (i);
write (fib (i))
od