10 lines
109 B
Awk
10 lines
109 B
Awk
|
function fact(n)
|
||
|
|
{
|
||
|
|
if ( n < 1 ) return 1;
|
||
|
|
r = 1
|
||
|
|
for(m = 2; m <= n; m++) {
|
||
|
|
r *= m;
|
||
|
|
}
|
||
|
|
return r
|
||
|
|
}
|