2011数字反转

题目描述 Description

给定一个整数，请将该数各个位上数字反转得到一个新数。新数也应满足整数的常见形
式，即除非给定的原数为零，否则反转后得到的新数的最高位数字不应为零.

输入描述 Input Description

输入共 1 行，一个整数N

输出描述 Output Description

输出共 1 行，一个整数，表示反转后的新数。

样例输入 Sample Input

-380

样例输出 Sample Output

-83

数据范围及提示 Data Size & Hint

数据范围
-1,000,000,000 ≤ N≤ 1,000,000,000。

题解：

模拟。

先判断符号，之后反制去首位的0，注意细节就行了。

var i:longint;

s:ansistring;

p:boolean;

begin

readln(s);

if s[1]=‘-‘ then

begin

delete(s,1,1);

write(‘-‘);

end;

for i:=length(s) downto 1 do

if (s[i]>‘0‘)or(p) then

begin

write(s[i]);

p:=true;

end;

if p=false then write(‘0‘);

end.