P1307 数字反转
题目描述
给定一个整数,请将该数各个位上数字反转得到一个新数。新数也应满足整数的常见形式,即除非给定的原数为零,否则反转后得到的新数的最高位数字不应为零(参见样例2)。
输入输出格式
输入格式:
输入文件名为reverse.in 。
输入共1 行,一个整数 N。
输出格式:
输出文件名为reverse.out 。
输出共1行,一个整数,表示反转后的新数。
输入输出样例
输入样例#1:
123
输出样例#1:
321
输入样例#2:
-380
输出样例#2:
-83
说明
数据范围
-1,000,000,000≤ N≤ 1,000,000,000 。
noip2011普及组第一题
var
s:string;
i,x:longint;
begin
read(s);
if s[1]='-' then begin//当数是负数是,负号在前
write('-');
s[1]:=' ';
end;
for i:=length(s) downto 1 do//反转输出,并且保证在没出现除“0”以外的数字时不输出“0”
begin
if s[i]<>'0' then inc(x);
if x>0 then write(s[i]);
end;
end.