75
8. ADDUP
0 REM Add-up
10 LET X = RND(100)
20 LET Y = RND(100)
30 PRINT "If"; X; "plus"; Y; "is equal to SUM,"
40 INPUT "then what is the value of SUM"; ANS
50 IF ANS = X + Y THEN PRINT "Yes, you’re right!": END
60 PRINT "Oh, no! The answer is"; X + Y; "."
70 END
9. HANGMAN
0 REM HANGMAN
10 X = RND(5)
20 LIVE = 5
30 FOR I = 1 TO X
40 READ SECRET$
50 NEXT I
60 LET L = LEN(SECRET$)
70 PRINT "Let’s play a game of hangman."
80 PRINT "The word has"; L; "letters."
To Next Page
Loading...
