2021-01-31 22:25:31 +03:00
|
|
|
var n, i;
|
2020-01-05 03:33:17 +03:00
|
|
|
|
|
|
|
|
fun fact (n) {
|
|
|
|
|
if n <= 1
|
|
|
|
|
then 1
|
|
|
|
|
else
|
|
|
|
|
(n * fact (n-1))
|
|
|
|
|
fi
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
n := read ();
|
|
|
|
|
|
2024-01-26 18:45:03 +01:00
|
|
|
fun f () {}
|
|
|
|
|
|
2020-01-05 03:33:17 +03:00
|
|
|
for i := n, i >= 1, i := i-1 do
|
|
|
|
|
write (i);
|
|
|
|
|
write (fact (i))
|
|
|
|
|
od
|