# 74

s=" "*128
$<.map{|l|w,p=l.split
s[(p=p.to_i)..w.size+p]=?*+w}
$><<s.rstrip