{ (c) 1998 CREEQ <creeq@web.de> }
program WE_ARE_THE_CHAMPIONS;
uses Crt;
begin
  clrscr;
  sound(349);
  delay(375);
  nosound;
  sound(349);
  delay(125);
  nosound;
  sound(330);
  delay(125);
  nosound;
  sound(349);
  delay(125);
  nosound;
  sound(330);
  delay(250);
  nosound;
  sound(262);
  delay(125);
  nosound;
  sound(262);
  delay(250);
  nosound;
  sound(220);
  delay(125);
  nosound;
  sound(294);
  delay(250);
  nosound;
  sound(220);
  delay(125);
  nosound;
  sound(220);
  delay(375);
  nosound;
  delay(625);
  sound(262);
  delay(125);
  nosound;
  sound(349);
  delay(375);
  nosound;
  sound(392);
  delay(125);
  nosound;
  sound(440);
  delay(125);
  nosound;
  sound(523);
  delay(250);
  nosound;
  sound(440);
  delay(125);
  nosound;
  sound(440);
  delay(125);
  nosound;
  sound(294);
  delay(125);
  nosound;
  sound(323);
  delay(125);
  nosound;
  sound(294);
  delay(375);
  nosound;
  sound(294);
  delay(125);
  nosound;
  delay(1250);
  sound(294);
  delay(375);
  nosound;
  sound(262);
  delay(250);
  nosound;
  sound(294);
  delay(125);
  nosound;
  sound(262);
  delay(375);
  nosound;
  sound(247);
  delay(375);
  nosound;
  sound(494);
  delay(375);
  nosound;
  sound(494);
  delay(250);
  nosound;
  sound(494);
  delay(125);
  nosound;
  sound(440);
  delay(375);
  nosound;
  sound(392);
  delay(375);
  nosound;
  sound(440);
  delay(375);
  nosound;
  sound(349);
  delay(250);
  nosound;
  sound(494);
  delay(125);
  nosound;
  sound(440);
  delay(250);
  nosound;
  sound(349);
  delay(250);
  nosound;
  sound(494);
  delay(125);
  nosound;
  sound(440);
  delay(250);
  nosound;
  sound(349);
  delay(250);
  nosound;
  sound(494);
  delay(125);
  nosound;
  sound(440);
  delay(375);
  nosound;
  sound(349);
  delay(375);
  nosound;
  delay(500);
  sound(330);
  delay(125);
  nosound;
  sound(262);
  delay(125);
  nosound;
  sound(349);
  delay(375);
  nosound;
  sound(349);
  delay(375);
  nosound;
  sound(349);
  delay(375);
  nosound;
  sound(349);
  delay(375);
  nosound;
  sound(349);
  delay(375);
  nosound;
  sound(349);
  delay(375);
  nosound;
  readkey;
end.