program merge;
(* merge two text files, line_i(output)=line_i(1) + line_i(2) *)
(* assuming the two input files have an equal number of lines *)
var
   f1,f2: text;
   s1,s2,s: string;
begin
   assign(f1,paramstr(1));
   reset(f1);
   assign(f2,paramstr(2));
   reset(f2);
   while not eof(f1) do
   begin
      readln(f1,s1);
      readln(f2,s2);
      writeln(s1+' '+s2)
   end;
   close(f1);
   close(f2);
end.
