给定一个整数,请将该数各个位上数字反转得到一个新数。新数也应满足整数的常见形式,即除非给定的原数为零,否则反转后得到的新数的最高位数字不应为零(参见样例2)。
输入格式:
输入文件名为reverse.in 。
输入共1 行,一个整数 N。
输出格式:
输出文件名为reverse.out 。
输出共1行,一个整数,表示反转后的新数。
输入:123
输出:321
输入:-380
输出:-83
var
flag,n,sum:longint;
begin
readln(n);
flag:=1;
if n<0 then
begin
n:=n*(-1);
flag:=-1;
end;
sum:=0;
while n>0 do
begin
sum:=sum*10;
sum:=sum+n mod 10;
n:=n div 10;
end;
writeln(sum*flag);
end.