Factorial: Difference between revisions
→{{header|FreeBASIC}}
(→{{header|RacketScript}}: remove) Tag: Manual revert |
Basicgames (talk | contribs) |
||
Line 1,492:
9 => 362880
10 => 3628800</pre>
==={{header|FTCBASIC}}===
<syntaxhighlight lang="basic">define f = 1, n = 0
print "Factorial"
print "Enter an integer: " \
input n
do
let f = f * n
-1 n
loop n > 0
print f
pause
end</syntaxhighlight>
==={{header|FutureBasic}}===
| |||