数字反转

题意

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

分析

如果最高位是‘-’，则先输出‘-’，再将数字反转。

var
n,t:string;
i,t1:longint;
begin
    read(n);
    if n[1]='-' then
    begin
        write('-');
        delete(n,1,1);
    end;
    t:='';
    for i:=length(n) downto 1 do
    t:=t+n[i];
    val(t,t1);
    write(t1);
end.