johnblood/learning-to-code
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

new qb64projects

Browse Source
This commit is contained in:
John Paul Wohlscheid
2021-04-20 22:22:17 -04:00
parent 250a292421
commit fcd9b60b3c
3 changed files with 58 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

46
qb64/guessing-game.bas
View File

@@ -1,24 +1,24 @@
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
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
print "You have the skill of