99 Bottles of Beer/Basic: Difference between revisions
Content added Content deleted
Line 754: | Line 754: | ||
==={{header|QB64}}=== |
==={{header|QB64}}=== |
||
<lang |
<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") |