nuttx-apps/examples/bastest/tests/test28.bas

7 lines
75 B
QBasic

def fnfac(n)
if n=1 then fnreturn 1
fnend n*fnfac(n-1)
print fnfac(10)