s=$/;gets;s+=[p,*s]*$1while/(.)#$1+/;$><