19 lines
288 B
Text
19 lines
288 B
Text
rem - return n!
|
|
def fn.factorial(n)
|
|
f = 1
|
|
for i = 1 to n
|
|
f = f * i
|
|
next i
|
|
fn.factorial = f
|
|
return
|
|
fend
|
|
|
|
print "Factorial Calculator"
|
|
print
|
|
print " n n!"
|
|
print "-------------------"
|
|
for k = 1 to 14
|
|
print using "## ###,###,###,###"; k; fn.factorial(k)
|
|
next k
|
|
|
|
end
|