Простые задчки на файлы, просьба помочь Опции

[Retabol]

Всем привет!
Огромная просьба помочь мне решить две задачи.
Решается оценка(не вру).
1) Дан текстовый файл. Вставить в начало каждой строки ее номер и записать
преобразованные строки в новый файл.
2)Даны файлы F и G, элементами которых являются символы.
Записать в файл H все элементы файлов F и G, сохраняя деление на строки.

ЗЫ. Просьба написать полный текст задачи. Помогите тупому, плз...
Буду очень благодарен....

[APAL]

2)Даны файлы F и G, элементами которых являются символы.
Записать в файл H все элементы файлов F и G, сохраняя деление на строки.

Можно уточнить условие?
Если H - это текстовый файл, то:

Код

Var
 f,g : File of Char;
 h   : Text;
 Ch  : Char;
Begin
 Assign(f,'F.CHR');
 Assign(g,'G.CHR');
 Assign(h,'H.TXT');
 Reset(f);
 ReWrite(h);
 While not EOF(f) do
 Begin
   Read(f,Ch);
   If Ch=#13 then Writeln(h) else Write(h,Ch);
 End;
 Close(f);
 Writeln(h);
 Reset(g);
 While not EOF(g) do
 Begin
   Read(g,Ch);
   If Ch=#13 then Writeln(h) else Write(h,Ch);
 End;
 Close(g);
 Close(h);
End.