8 lines
115 B
Text
8 lines
115 B
Text
10 REM FACTORIAL
|
|
20 INPUT "ENTER AN INTEGER"N
|
|
30 LET F=1
|
|
40 FOR K=1 TO N
|
|
50 LET F=F*K
|
|
60 NEXT K
|
|
70 PRINT F
|
|
80 STOP
|