mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 06:48:48 +00:00
18 lines
No EOL
212 B
Text
18 lines
No EOL
212 B
Text
var n, i, result;
|
|
|
|
fun fact (n) {
|
|
if n <= 1
|
|
then result := 1
|
|
else
|
|
fact (n-1);
|
|
result := result * n
|
|
fi
|
|
}
|
|
|
|
n := read ();
|
|
|
|
for i := n, i >= 1, i := i-1 do
|
|
fact (i);
|
|
write (i);
|
|
write (result)
|
|
od |