файлы Опции

[1211]

Помогите с задачами.
1Реализуйте последовательное добавление содержимого трех нетипизированных файлов к первоначально пустому файлу с заданным именем.
2.Дан текстовый файл f. Предполагается, что длина одного слова не превосходит десяти и что число слов делится на 100. Подготовить файл для печати слов в две колонки по пятьдесят строк на странице. Слова должны быть размещены в файле f1 в следующем порядке: 1-е слово, 51-е слово, 2-е слово, 52-е слово,..., 50-е слово, 100-е слово, затем (следующая страница) 101-е слово, 151-е слово,..., 150-е слово, 200-е слово и т.д.

[Lapp]

Проще всего, думаю, считывать файл как file of char.
Читаешь посимвольно.
Пока идут буквы - это одно слово.
Считываешь 100 слов в массив s: array[1..100]of string[10].
В цикле записываешь:

for i:=1 to 50 do WriteLn(s[i],' ',s[i+50]);

Только не совсем понятно, чем разделять страницы. Пустой строкой?