program third
  implicit none

  integer :: lo, le, n, i
  character(50) :: o, e
  character(100) :: ans

  read(*,*) o
  read(*,*) e

  lo = len(trim(o))
  le = len(trim(e))
  
  ans = ''
  n = lo
  
  if (lo == le) then
     do i = 1, n
        ans = trim(ans)//o(i:i)
        ans = trim(ans)//e(i:i)
     end do
     write(*,*) ans
     stop
  else
     do i = 1, n-1
        ans = trim(ans)//o(i:i)
        ans = trim(ans)//e(i:i)
     end do
     ans = trim(ans)//o(n:n)

     write(*,*) ans

  end if

  stop
end program third


     
     
  
