gets;puts$<.read.gsub(/_/){$_[-2+$.+=1,1]}