mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 06:48:48 +00:00
12 lines
82 B
Text
12 lines
82 B
Text
|
read (n);
|
||
|
|
|
||
|
|
s := 1;
|
||
|
|
|
||
|
|
repeat
|
||
|
|
|
||
|
|
s := s * n;
|
||
|
|
n := n - 1
|
||
|
|
|
||
|
|
until n == 0;
|
||
|
|
|
||
|
|
write (s)
|