main=getLine>>=f
f s=do
putStrLn s
let(a,_:b)=span(>' ')s
f$a++b