Delay.PAS

Language:
Русский
English

   {Delay.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀
  {Sample code for the Delay, NoSound, and Sound  procedures.}

  uses Crt;

  begin
     Sound(220);        { Beep }
     Delay(200);        { For 200 ms }
     NoSound;           { Relief! }
  end.

Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //