發表新討論
#5112: PETER这个老烟鬼


jkljk6 (钱猪肉)

c079. 10346 - Peter's Smokes -- UVa 10346 | From: [61.170.201.178] | 發表日期: 2011-05-11 19:08

var i,j,k:longint;
begin
while not eof do begin
readln(i,j);k:=0;
repeat
k:=k+i;
i:=i div j;
until i=0;writeln(k);
end;
end.

ZeroJudge Forum