99 Bottles of Beer/Basic: Difference between revisions

99 Bottles of Beer/Basic en Yabasic
(consolidate step 2 of 2)
(99 Bottles of Beer/Basic en Yabasic)
Line 526:
DATA "No more","Go to the store and buy some more. 99"
END</lang>
 
==={{header|Yabasic}}===
<lang yabasic>
b$ = " bottles"
for bottles = 99 to 1 step -1
if (bottles = 1) then b$ = " bottle" : fi
print bottles, b$, " of beer on the wall, "
print bottles , b$, " of beer"
print "Take one down, pass it around, "
if bottles = 1 then
print "no more bottles of beer on the wall.\n"
else
print bottles - 1, b$, " of beer on the wall."
print
end if
next bottles
end
</lang>
 
 
=={{header|GW-BASIC}}==
2,122

edits