Написать программу-таймер, которая по истечении заданного промежутка времени, величина которого вводится с клавиатуры, выдает звуковой сигнал.

  Program Timer;

Uses Crt;

 

 

 var i:longint;

begin

     write(Введите прмежуток времени в секундах:);

     readln(i);

     Delay(i*1000); 

     Sound(440); {нота Ля} 

     Delay(2000);{в течении 2 секунд}

 

     NoSound;

       write(Нажмите любую клавишу для выхода:);  

 

 

 

    readkey;

 

 

end.

 

 

 

 

 

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку
×