l="":l main=interact$unlines.reverse.foldr(zipWith(:))l.lines