6 lines
90 B
Text
6 lines
90 B
Text
10 INPUT N
|
|
20 LET FACT=1
|
|
30 FOR I=2 TO N
|
|
40 LET FACT=FACT*I
|
|
50 NEXT I
|
|
60 PRINT FACT
|