lama_byterun/regression/test029.lama

21 lines
250 B
Text
Raw Normal View History

var i, n, result;
fun fib (n) {
var r;
2018-03-27 01:51:22 +03:00
if n <= 1
then result := 1
else
fib (n-1);
r := result;
fib (n-2);
result := result + r
fi
}
2018-04-25 01:06:18 +03:00
n := read ();
2018-03-27 01:51:22 +03:00
2024-07-11 13:05:43 +02:00
for i := n, i >= 1, i := i-1 do
2018-03-27 01:51:22 +03:00
fib (i);
write (i);
write (result)
od