99 Bottles of Beer/Basic: Difference between revisions
Content added Content deleted
| Line 754: | Line 754: | ||
==={{header|QB64}}=== |
==={{header|QB64}}=== |
||
'''CBTJD: 2020.03.08''' |
|||
A$ = "bottle": B$ = " of beer": C$ = " on the wall": D$ = " Take one down, pass it around": E$ = " No more " |
<lang vb>A$ = "bottle": B$ = " of beer": C$ = " on the wall": D$ = " Take one down, pass it around": E$ = " No more " |
||
FOR B = 99 TO 1 STEP -1 |
FOR B = 99 TO 1 STEP -1 |
||
S$ = STRING$(ABS(B > 1), "s") |
S$ = STRING$(ABS(B > 1), "s") |
||