function solve() n, k = readline() |> split |> x->parse.(Int, x) a = String[] for _ in 1:n s = readline() push!(a, s) end for i in 1:n for _ in 1:k li = a[i] for j in 1:n for _ in 1:k print(li[j]) end end println() end end end solve()