8 lines
175 B
Text
8 lines
175 B
Text
select "std"
|
|
factorial = 1
|
|
n = readln()
|
|
for(i=1,i<=n,++i)
|
|
{
|
|
factorial = factorial * i
|
|
}
|
|
showln "factorial of " + n + " is " + factorial
|