lani711 @ 2015-11-26 12:41:24
N/A什么意思?
by kkksc03 @ 2015-11-26 14:23:03
@[url=/space/show?uid=13734]lani711[/url] not avaliable ,无法获得结果。意思是你编译错误了。要在本地跑一次之后再提交
by 飞天者 @ 2015-11-27 22:52:11
var
a,b:longint;
begin
readln(a);
while a<>0 do
begin
b:=b*10+a mod 10;
a:=a div 10;
end;
writeln(b);
end.
by Linxrain @ 2015-12-25 23:49:10
输入后面好像不一定有回车吧
by 肖圣明 @ 2016-02-01 14:55:14
var s,k:string;
i:longint;
begin
read(k);
if k[1]='-' then begin
write('-');
delete(k,1,1);
end;
while k[length(k)]='0' do
delete(k,length(k),1);
for i:=1 to length(k) do
s:=k[i]+s;
write(s);
end.