查人人中国名人网山东大学档案馆电话:判断任一正整数是否为对称数。（对称数指从整数左右两端算起对称相等的数，如121).
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/12 19:17:50
用pascal程序解答
var
a:array[1..1000] of integer;
b:array[1..1000] of char;
i,j,k:integer;
bl:boolean;
begin
i:=0;
bl:=true;
repeat
i:=i+1;
read(b[i]);
until (ord(b[i])<ord('0'))or(ord(b[i])>ord('9'));
i:=i-1;
if (ord(b[i])<ord('0'))or(ord(b[i])>ord('9'))
then begin
end
else
begin
for j:=1 to i do
if (b[0+j])<>(b[i+1-j])
then bl:=false;
writeln(bl);
end;
end.
用取位函数