var s:String;begin readln(s);{$I-}repeat readln(s);writeln(s)until ioresult<>0;end.