17 lines
433 B
Plaintext
17 lines
433 B
Plaintext
monton = 12
|
|
llevar = 0
|
|
|
|
while monton > 0
|
|
input "There are "; monton; " tokens remaining. How many would you like to take? "; llevar
|
|
while llevar = 0 or llevar > 3
|
|
input "You must take 1, 2, or 3 tokens. How many would you like to take "; llevar
|
|
wend
|
|
|
|
print "On my turn I will take "; 4 - llevar; " token(s)."
|
|
monton = monton - 4
|
|
wend
|
|
|
|
print
|
|
print "I got the last token. I win! Better luck next time."
|
|
end
|