pascal编程12、输入一个正整数(longint)，将它倒置
12、输入一个正整数(longint)，将它倒置后输出。 使用PASL语言
如果返回longint如下:function( ):longint;varsin, :Integer;beginsin:=IntToStr(innum);sout:="";fori:=1tolength(sin)dosout:=sin[i]+sout;result:=StrToInt(sout);end;如果返回string函数如下function( ):String; :Integer;beginsin:=IntToStr(innum);fori:=1tolength(sin)doresult:=sin[i]+result;end;