Jump to content

99 bottles of beer: Difference between revisions

imported>Rowsety Moid
No edit summary
Line 3,708:
=={{header|EasyLang}}==
<syntaxhighlight lang="easylang">
proc checkPluralgetPlural num . word$ .
word$ = "bottles"
if num = 1
word$ = "bottle"
else
word$ = "bottles"
.
.
#
for i = 99 step -1 to 1
repeat
call checkPlural i pluralWord$
getPlural i bottle$
print i & " " & pluralWord$ & " of beer on the wall"
print i & " " & pluralWordbottle$ & " of beer on the wall"
print i & " " & bottle$ & " of beer"
print "Take one down, pass it around"
call checkPlural i -= 1 pluralWord$
ifuntil i - 1 = 0
getPlural i bottle$
print "No more bottles of beer on the wall"
print i & " " & pluralWordbottle$ & " of beer on the wall"
else
print i - 1 & " " & pluralWord$ & " of beer on the wall"
.
print ""
.
print "No more bottles of beer on the wall"
</syntaxhighlight>
 
2,083

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.