main=interact f
f s=s++'\n':do(a,_:b)<-[span(>' ')s];f$a++b