main=interact$(0%).lines x%(a:b)|length a>x=a!!x:(x+1)%b _%[]="" _%l=0%l