Помогите плз решить задачу. Сформировать текстовый файл из нескольких строк. Вставить в начало каждой строки её номер и записать преобразованные строки во второй текстовый файл. Помогите юуду оч признателен.

Что именно у тебя не получается сделать?

у меня не получается вставить номер строки в начало строки текста.

Почему? В Help-е Турбо Паскаля есть функция, конвертирующая число в строку (как пример для процедуры Str):

function IntToStr(I: Longint): String;
var S: string[11];
begin
  Str(I, S);
  IntToStr := S;
end;

Вот с использованием этой функции и делай:

...
n := 0;
While not Eof(f_in) do begin
  inc(n);
  readln(f_in, s);
  writeln(f_out, IntToStr(n) + ' ' + s);
end;
...

volvo спасибо тебе, это мне помогло.