ReadKey.PAS

Language:
Русский
English

  {ReadKey.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
 {Sample code for the ReadKey function.}

  uses WinCrt;

 var
   C: Char;

 begin
   Writeln('Please press a key');
   C := Readkey;
   Writeln(' You pressed ', C, ', whose ASCII value is ', Ord(C), '.');
 end.

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