Mail

В этот день много лет назад...
8 мая. В 1965 году (59 лет назад) - Указы Президиума Верховного Совета СССР- об утверждении Положения о почетном звании "Город-Герой", о присвоении Брестской крепости почетного звания "Крепость-Герой"; о вручении ордена Ленина и медали "Золотая Звезда" городам-героям Волгограду, Севастополю и Одессе, медали "Золотая Звезда" городам-героям Ленинграду и Киеву.

Turbo Pascal Documentation

Процедура Sound
Модуль Сrt

     Функция: Включает внутренний динамик.
     Описание: Sound(герц : word)
      Примечания: Параметр "герц" задает частоту генерируемо-
го  сигнала  в  герцах. Звуковой сигнал будет звучать до тех
пор, пока он не будет явным образом  выключен  обращением  к
процедуре NoSound.
     Прочее: См. также процедуру NoSound.
     Пример:

       uses Crt;
       begin
         Sound(220); { сигнал }
         Delay(200); { пауза }
         NoSound;    { выключить }