{
TASK:ldist
LANG:PASCAL
}
var
 t:text;
 s:string;
begin
  assign (t,'');
  reset (t);
  repeat
    readln (t,s);
    writeln (s);
  until eof(t);
end.