import Control.Monad
main = replicateM 2 getLine >>= putStrLn . solve
    where
        solve [xs, ys] = build xs ys

build :: String -> String -> String
build (o : os) (y : ys) = o : y : build os ys
build (o : os) _ = o : build os []
build _ _ = []
