n=0;do1 i=1,105;print'(i0)',n;1 n=n+3**trailz(i)/2+1;end