Создать новый файл qa.txt, который будет содержать строки с вопросами и ответами из файлов q.txt и a.txt.

@dimonesk · Регистрация: 25.01.2010

В текстовом редакторе создать два текстовых файла q.txt и a.txt, которые соответственно содержат вопросы и ответы на их. Создать новый файл qa.txt, который будет содержать строки с вопросами и ответами из файлов q.txt и a.txt. Вывести вопросы и ответы.

Буду очень благодарен за помощь

@Puporev · 25.01.2010, 13:38

dimonesk, Создайте эти файлы, откройте их и читайте одновременно.

Pascal

while not eof(f1)and not eof(f2) do
 begin
  readln(f1,s1);
  readln(f2,s2);
  s3:=s1+' - '+s2;
  writeln(f3,s3);
 end;

Опции темы

Создать новый файл qa.txt, который будет содержать строки с вопросами и ответами из файлов q.txt и a.txt.

Решение