RosettaCodeData/Task/Terminal-control-Ringing-the-terminal-bell/Delphi/terminal-control-ringing-the-terminal-bell.pas

program TerminalBell;

{$APPTYPE CONSOLE}

begin
  Writeln(#7);
end.