99 bottles of beer: Difference between revisions
(→{{header|Python}}: even shorter) |
(→{{header|Python}}: And yet shorter) |
||
Line 250: | Line 250: | ||
=={{header|Python}}== |
=={{header|Python}}== |
||
<python>a, b, c, s = " bottles of beer", " on the wall\n", "Take one down, pass it around\n", str |
<python>a, b, c, s = " bottles of beer", " on the wall\n", "Take one down, pass it around\n", str |
||
for i in [s(x)+a+b+s(x)+a+"\n"+c+s(x-1)+a+b for x in xrange(99, 0, -1)]: print i</python> |
|||
for i in d: print i</python> |
Revision as of 12:49, 1 March 2008
In this puzzle, write code to print out the entire "99 bottles of beer on the wall" song. For those who do not know the song, the lyrics follow this form:
X bottles of beer on the wall X bottles of beer Take one down, pass it around X-1 bottles of beer on the wall X-1 bottles of beer on the wall ... Take one down, pass it around 0 bottles of beer on the wall
Where X and X-1 are replaced by numbers of course. Grammatical support for "1 bottle of beer" is optional. As with any puzzle, try to do it in as creative/concise/comical a way as possible (simple, obvious solutions allowed, too).
See also: http://99-bottles-of-beer.net/
Ada
<ada>with Ada.Text_Io; use Ada.Text_Io;
procedure Bottles is begin for X in reverse 1..99 loop Put_Line(Integer'Image(X) & " bottles of beer on the wall"); Put_Line(Integer'Image(X) & " bottles of beer"); Put_Line("Take one down, pass it around"); Put_Line(Integer'Image(X - 1) & " bottles of beer on the wall"); New_Line; end loop; end Bottles;</ada>
BASIC
Sound
This version plays the tune 100 times while printing out the number of beers on the wall. <qbasic>PLAY "<" FOR i = 99 TO 0 STEP -1
PRINT i PLAY "e-8e-8e-8<b8b8b8>e-8e-8e-8e-4"'X bottles of beer on the wall PLAY "f8f8f8c8c8c8f4"'X bottles of beer PLAY "d4d8d8 N0 d8d8d8d4"'take one down, pass it around PLAY "<a+8a+8a+8>c8c8d8d+8d+8d+8d+4"'X-1 bottles of beer on the wall
NEXT i</qbasic>
Text
<qbasic>FOR x = 99 TO 1 STEP -1
PRINT x; "bottles of beer on the wall" PRINT x; "bottles of beer" PRINT "Take one down, pass it around" PRINT x-1; "bottles of beer on the wall" PRINT
NEXT x</qbasic>
C++
<c>#include<iostream>
- include <ostream>
using namespace std; int main(int argc, char* argv[]){
for(int x = 99;x>=1; --x){ cout<<x<<" bottles of beer on the wall\n"<<x<<" bottles of beer\n"; cout<<"Take one down, pass it around\n"<<x-1<<" bottles of beer on the wall\n\n"; }
}</c>
Common Lisp
<lisp>(defun bottles (x)
(format t "~a bottles of beer on the wall~%" x) (format t "~a bottles of beer~%" x) (format t "Take one down, pass it around,~%") (format t "~a bottles of beer on the wall~%" (- x 1)) (if (> (- x 1) 0)
(bottles (- x 1))))</lisp>
and then just call
<lisp>(bottles 99)</lisp>
D
Uses a non-commutative operator to construct a narrative expression of 99-bottles song. <d>module nbottles ; import std.string ; import std.stdio ;
alias Exception NoMoreBottlesLeft ;
enum { // role
None = 0x0, // normal for OP and Term Taker = 0x1, // for OP that minus one bottlesLeft Viewer = 0x2, // for Term display bottlesLeft NewLine = 0x4, // for Term that sending a newline to IO
} class XP {
static string[] ones = ["","one","two","three","four", "five","six","seven","eight","nine"] ; static string[] tens = ["", "ten", "twenty","thirty","fourty", "fifty","sixty","seventy","eighty","ninty"] ; static string[] teens = ["","eleven","twelve","thirteen","fourteen", "fifteen","sixteen","seventeen","eighteen","nineteen"] ; static private int bottlesLeft = 99 ; static bool opCall() { if (bottlesLeft == 0) throw new NoMoreBottlesLeft("") ; return true ; } static string Cap(string s) { return toupper(s[0..1]) ~ s[1..$] ; } static string num2word(int i) { if (i == 0) return "No more" ; //return std.string.toString(i) ; string[2] digits ; int numTen = i / 10 ; int numOne = i % 10 ; if(i == 10) digits[1] = tens[1] ; else if(numTen == 0) digits[1] = ones[numOne] ; else if(numTen == 1) digits[1] = teens[numOne] ; else { digits[0] = tens[numTen] ; digits[1] = ones[numOne] ; } return Cap(strip(join(digits," "))) ; } static string getBottles() { string num = num2word(bottlesLeft) ; string pural = (bottlesLeft != 1) ? "s" : ""; return num ~ " bottle" ~ pural ; } string words ; int role ; this (string w, int r) { words = w, role = r ; } string getWord() { string postfix = " "; string word ; if (words is null) return "" ; else word = words ; if (role & Viewer) word = getBottles ; if (role & NewLine) postfix = "\n" ; return word ~ postfix ; }
} alias XP A_drunker_sings_a_song ;
class Term : XP {
this (string w = null, int r = None) { super(w, r) ; }
} class OP : XP {
this (string w = null, int r = None) { super(w, r) ; } OP opDiv_r(Term t) { if(role & Taker) A_drunker_sings_a_song.bottlesLeft-- ; writef(t.getWord) ; writef(getWord) ; return this ; } Term opDiv(Term t) { writef(t.getWord) ; return new Term ; }
}
void main() {
Term N_bottles = new Term("", Viewer) ; OP of = new OP("of") ; Term beer = new Term("beer") ; OP on = new OP("on") ; Term the_wall = new Term("the wall", NewLine) ; Term beer_ = new Term("beer", NewLine) ; Term Take = new Term("Take") ; OP one = new OP("one", Taker) ; Term down = new Term("down,") ; Term pass = new Term("pass") ; OP it = new OP("it") ; Term around = new Term("around", NewLine) ; Term the_wall_ = new Term("the wall\n", NewLine) ; try{ for(; A_drunker_sings_a_song(); N_bottles/of/beer/on/the_wall, N_bottles/of/beer_ , Take/one/down, pass/it/around, N_bottles/of/beer/on/the_wall_
) {} } catch (NoMoreBottlesLeft e) { writefln("Go buy more beer!") ; }
}</d>
Java
Console
<java>public class Beer{
public static void main(String[] args){ for(int x = 99;x>=1; --x) System.out.println(x+"bottles of beer on the wall\n"+x+"bottles of beer\n"+"Take one down, pass it around\n"+ (x-1)+"bottles of beer on the wall\n"); }
}</java>
GUI
This version requires user interaction. The first two lines are shown in a text area on a window. The third line is shown on a button which you need to click to see the fourth line in a message box. The numbers update and the process repeats until "0 bottles of beer on the wall" is shown in a message box, when the program ends. <java>import java.awt.BorderLayout; import java.awt.event.ActionEvent; import java.awt.event.ActionListener; import javax.swing.JButton; import javax.swing.JFrame; import javax.swing.JOptionPane; import javax.swing.JTextArea; public class Beer extends JFrame implements ActionListener{ private int x; private JButton take; private JTextArea text; public static void main(String[] args){ new Beer();//build and show the GUI }
public Beer(){ x= 99; take= new JButton("Take one down, pass it around"); text= new JTextArea(4,30);//size the area to 4 lines, 30 chars each text.setText(x + " bottles of beer on the wall\n" + x + " bottles of beer"); take.addActionListener(this);//listen to the button setLayout(new BorderLayout());//handle placement of components add(text, BorderLayout.CENTER);//put the text area in the largest section add(take, BorderLayout.SOUTH);//put the button underneath it pack();//auto-size the window setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);//exit on "X" (I hate System.exit...) setVisible(true);//show it }
public void actionPerformed(ActionEvent arg0){ if(arg0.getSource() == take){//if they clicked the button --x; JOptionPane.showMessageDialog(null, x + " bottles of beer on the wall");//show a popup message text.setText(x + " bottles of beer on the wall\n" + x + " bottles of beer");//change the text } if(x == 0){//if it's the end dispose();//end } } }</java>
Python
<python>a, b, c, s = " bottles of beer", " on the wall\n", "Take one down, pass it around\n", str for i in [s(x)+a+b+s(x)+a+"\n"+c+s(x-1)+a+b for x in xrange(99, 0, -1)]: print i</python>