9 lines
115 B
Text
9 lines
115 B
Text
|
|
10 CLS
|
||
|
|
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 END
|