$T=-<>;<>;print$$T+!<>=~s#\d+#$/=$";$%=<>*2;map$$_+=$-=${$_+$&}+$%-$$_,$T..-$&while$%/=2#ger