program piiks;
uses crt;
begin
 sound(500);
  delay(200);
 sound(750);
  delay(200);
 sound(1000);
  delay(200);
 sound(750);
  delay(200);
 sound(1000);
  delay(200);
 sound(750);
  delay(200);
 sound(500);
  delay(300);
 nosound;
end.