Factorial: Difference between revisions

==={{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>