% Zeno version of 99 Bottles of beer (Bottles.zen)
% Philipp Winterberg, http://www.philipp-winterberg.de

var b : int := 99

program

    while b > 0
    
        put b:2, " bottle(s) of beer on the wall,"
        put b:2, " bottle(s) of beer."
        put "Take one down, pass it around,"
        decr b
        put b:2, " bottle(s) of beer on the wall."   
        put " "
        
    end while

end program