1 read*,x,y;print'(99i0)',(int(mod(x*y**i,y)),i=-log(x)/log(y),0);goto1;end