为什么出的都是0=0(base0)……

本地测正常……

我仅仅用了EOF……

附：

const digital='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ';

var n,m,r,t:longint;ans:string;

begin

while not eof do

begin

ans:='';

read(n,m);t:=n;

while n0 do

begin

r:=n mod m;

if r