P1307 数字反转

 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.