Mail

В этот день много лет назад...
26 ноября. В 1884 году (140 лет назад) - В России вводится налог на недвижимость.

Turbo Pascal Documentation

Процедура Rewrite

     Функция: Создает и открывает новый файл.
     Описание: Rewrite(f [ : file; разм_записи : word ] )
     Примечания: Параметр f  является  файловой  переменной,
соответствующей  любому  типу файла. Он должен быть связан с
внешним  файлом  с  помощью   процедуры   Assign.   Параметр
"разм_записи"  представляет  собой  необязательное выражение
длиной в слово и может указываться только в том случае, если
f является нетипизованным файлом.
     Процедура Rewrite создает новый внешний файл, имя кото-
рого  присвоено  f. Если внешний файл с указанным именем уже
существует, то он удаляется и на его месте  создается  новый
пустой  файл. Если файл f уже открыт, то он сначала закрыва-
ется, а затем открывается вновь. Текущая позиция в файле ус-
танавливается  на начало файла. Если f было присвоено пустое
имя  (например,    Assign(f,'')),  то  после   обращения   к
процедуре  Reset(f)  будет ссылкой на стандартный файл ввода
(стандартный канал номер 1).
     Если f - текстовый файл,  то  он  становится  доступным
только по записи. После обращения к процедуре Rewrite Еоf(f)
принимает значение Тruе, если файл пуст, и значение False  в
противном случае.
     Если f  является  нетипизованным  файлом,  то  параметр
"разм_записи"  определяет  размер записи, который должен ис-
пользоваться при передаче данных. Если этот параметр опущен,
то он подразумевается равным по умолчанию 128 байтам.
     При  указании  директивы  компилятора   {I-}   функция
IORеsult будет возвращать значение 0 в том случае, если опе-
рация завершилась успешно, и ненулевой код ошибки в  против-
ном случае.
     Отличия: В версии 3.0 Турбо-Паскаля  пустое  имя  файла
было недопустимо.
     Прочее: См. также процедуры Reset, Append, Assign.
     Пример:

var f : text;
begin
Assign(f,'NEWFILE,');
  Writeln(f,'Создается файл, в который записывается эта
             строка');
Close(f);
end.