do 100;pull a b;k=1;do 99;a=a/b;k=k+(a>=2);end;say k;end