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

  Program Timer;

Uses Crt;

 

 

 var i:longint;

begin

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

     readln(i);

     Delay(i*1000); 

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

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

 

     NoSound;

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

 

 

 

    readkey;

 

 

end.

 

 

 

 

 

 

Оцени ответ
Устал от уроков?

Нельзя всё время учиться. А для развлечения мы рекомендуем вам поиграть в отличную игру:

Forge of Empires [SOI] RU

Найти другие ответы

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