怎么将23这个数转成八进制?

来源:学生作业帮助网 编辑:作业帮 时间:2024/10/05 01:12:33
怎么将23这个数转成八进制?
x){dg mF/|cճ^]c/~ڱ&H8v61ik󞯝|̧mOv)eKl-"b⒢̼tL,ļb̼"<0KA(51%'OX*ce^$_iekPF6GA6(E8:3VS.ҝӭ R[UPr-.E%@GNJ$فaN

怎么将23这个数转成八进制?
怎么将23这个数转成八进制?

怎么将23这个数转成八进制?
我先回答,给分啊!3Q
const jz=8;
var s:string;i,j,l,t,ans:integer;
begin
readln(s);
l:=length(s);
for i:=1 to l do
begin
t:=ord(s[i])-48;
for j:=1 to l-i do t:=t*jz;
ans:=ans+t;
end;
writeln(ans);
end.