for each(c in readline(n=0))c>gc?q:print(c+1-0?++n:n*=c<{}?.5:n)