procedure Beep;
Воспроизводит короткий гудок. Обычно используется для привлечения внимания пользователя на неправильное действие.
Beep; //Beeps