base convert by uru

begin
repeat
var a,b,c,d:comp=1;read(a,b);repeat
c:=a mod b*d+c;a:=a div b;d:=d*10until a=0;writeln(c-1)until 1=0end.

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page