var
  infile : text;
  inputLine : string [80];
begin
  assign(infile, 'test.txt');
  reset(infile);
  while (not eof(infile)) do
    begin
      readln(infile, inputLine);
      writeln(inputLine)
    end
end.