Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- DIM N AS INTEGER, I AS INTEGER, F AS LONG
- INPUT "Input N: ", N
- IF (N = 0) OR (N = 1) THEN
- F = 1
- ELSE
- F = 1
- FOR I = 1 TO N
- F = F * I
- NEXT I
- END IF
- PRINT F
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement