作业帮 > 综合 > 作业

::用PASCAL输入一个正整数,然后与它倒过来的数相加输出

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/21 09:38:51
::用PASCAL输入一个正整数,然后与它倒过来的数相加输出
如 输入样例:749
输出样例:1696
var st:string;
i,sum:longint;
begin
readln(st);
for i:=1 to length(st) do sum:=sum*10+ord(st[i])-48+ord(st[length(st)-i+1])-48;
writeln(sum);
end.
刚才不小心写错了