begin if t=0 then begin writeln(s);exit;end;(我直接用颠倒数字,为了防止最后的零不输出,我就...
把这个数看成字符串,然后把字符串倒着输出就行了 program ex1;var ch:string[1];st:string;i,j,l:longint;begin readln(st);l:=length(st);for i:=1 to l do begin ch:=copy(st,l,1);delete(st,l,1);insert(ch,st,i);end;write(st);end.刚做的,不知能否AC ...
begin if t=0 then begin writeln(s);exit;end;(我直接用颠倒数字,为了防止最后的零不输出,我就...