learning-to-code/qb64/guessing-game.bas

24 lines
753 B
QBasic
Raw Normal View History

2021-03-03 22:42:43 +00:00
score = 0
PRINT "Hello, Player! What is your name?"
INPUT ; name$
PRINT
PRINT "Welcome " + name$ + "!"
PRINT "Please answer the following questions."
PRINT "A score of 5 is perfect."
PRINT "What is the result of 1 + 1?"
INPUT ; answer
IF answer = 2 THEN score = score + 1
PRINT "What does 3 times 4 equal?"
INPUT ; answer
IF answer = 12 THEN score = score + 1
PRINT "What is the answer to 81 divided by 9"
INPUT ; answer
IF answer = 9 THEN score = score + 1
print "What does 7 time 8 plus 10 equal"
INPUT ; answer
if answer = 66 then score = score + 1
print "What is the answer to the ultimate auestion of life, the universe, and everything."
input ; answer
if answer = 42 then score = score + 1
print "Your score: " + score
print "You have the skillof