Assign - Назначает файловой переменной имя внешнего файла.
Объявление:Procedure Assign(Var F; Name : String);
Режим:Windows, Real, Protected
Var F : Text;
Begin
Assign(F, ''); {Стандартное устройство вывода}
ReWrite(F);
WriteLn(F, 'Стандартное устройство вывода...');
Close(F);
End.