da=gets.chomp $s=[] def intpr src,s le=src.size t=0 while t