7 lines
170 B
Text
7 lines
170 B
Text
100 PROGRAM "Guess.bas"
|
|
110 RANDOMIZE
|
|
120 LET N=RND(10)+1
|
|
130 DO
|
|
140 INPUT PROMPT "Guess a number that's between 1-10: ":G
|
|
150 LOOP UNTIL N=G
|
|
160 PRINT "Well guessed!"
|