ll@N,a=-1;string@S;rrep(i,N)S[i]&1?(++++a>?=N-i):a;wt(a);