AssignCr.PAS

Язык:
Русский
English


 { Пример программы для процедуры AssignCrt }

uses Crt;

var
  MyScreenFile : Text;

begin
  AssignCrt(MyScreenFile);
 ReWrite(MyScreenFile);
 WriteLn(MyScreenFile,
    'Файловая переменная MyScreenFile связана с экраном.');
 Close(MyScreenFile);
end.
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //