Data update
This commit is contained in:
parent
4d5544505c
commit
4924dd0264
3073 changed files with 55820 additions and 4408 deletions
19
Task/Factorial/CBASIC/factorial.basic
Normal file
19
Task/Factorial/CBASIC/factorial.basic
Normal file
|
|
@ -0,0 +1,19 @@
|
|||
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
|
||||
Loading…
Add table
Add a link
Reference in a new issue