h,w,n=gets.split.map &:to_i c=[0]*w h.times do |i| g=gets.chomp w.times do |i| c[i]+=1 if g[i]==?# end end d=[0]*w v=[] n.times do |i| v<< [gets.to_i,i] end v.each do |e| 3.times do |i| d[e+i]+=1 end end w=v.sort f=[] w.each do |e| g=[] 3.times do |i| t=e[0]+i d[t]-=1 g<< c[t]-d[t]*3 c[t]=d[t]*3 end if g==[0,0,0] 3.times do |i| t=e[0]+i if c[t]!=0 g[i]+=1 c[t]-=1 break end end end f<< g+[e[1]] end f.sort!{|a,b|a[3]<=>b[3]} f.each do |e| 3.times do |i| s="" 3.times do |j| s+=e[j]>=3-i ? ?#:?. end puts s end end