9 lines
141 B
Text
9 lines
141 B
Text
10 LET F = 1
|
|
20 PRINT "Enter an integer."
|
|
30 INPUT N
|
|
40 IF N = 0 THEN GOTO 80
|
|
50 LET F = F * N
|
|
60 LET N = N - 1
|
|
70 GOTO 40
|
|
80 PRINT F
|
|
90 END
|