To find the factorial of given number. (Qbasic Code)
- CLS
INPUT "Enter any number"; n
f = 1
FOR i = 1 TO n
f = f * i
NEXT i
PRINT "The factorial of input number is"; f
END