8 lines
117 B
Text
8 lines
117 B
Text
10 PRINT "ENTER AN INTEGER:";
|
|
20 INPUT N
|
|
30 LET F = 1
|
|
40 FOR K = 1 TO N
|
|
50 LET F = F * K
|
|
60 NEXT K
|
|
70 PRINT F
|
|
80 END
|