main=interact$(\l->unwords[x|("0",x)<-zip l$"":l,x>"0"]).words