记录编号	76047	评测结果	AAAAAAAAAA
题目名称	[NOIP 2011]数字反转	最终得分	100
用户昵称	钨铅	是否通过	通过
代码语言	Pascal	运行时间	0.002 s
提交时间	2013-10-29 21:49:49	内存使用	0.17 MiB

program reverse;
var s:ansistring;
    yes:boolean;
    i,l:longint;
begin
assign(input,'reverse.in');
assign(output,'reverse.out');
reset(input);
rewrite(output);
read(s);
yes:=false;
if s[1]='-' then begin
                 yes:=true;
                 delete(s,1,1);
                 end;
l:=length(s);
while s[l]='0' do l:=l-1;
if yes then write('-');
for i:=l downto 1 do write(s[i]);
close(input);
close(output);
end.