发布网友 发布时间:2022-04-19 21:42
共2个回答
热心网友 时间:2023-07-15 06:27
(45d)16=(4*16^2+5*16+13)10=(1117)10
以下是a进制转10进制的pascal函数子程序:
function convert10(c:string;a:integer):longint;
{c为a进制的字符串,a表示a进制,返回结果为10进制长整型数}
var
k,i,j:integer;
cc:longint;
ch:char;
begin
k:=length(c);
cc:=0;
for i:=1 to k do begin
ch:=c[i];
case ch of
'A'..'F':j:=ord(ch)-ord('A')+10;
'a'..'f':j:=ord(ch)-ord('a')+10;
'0'..'9':j:=ord(ch)-ord('0');
end;
cc:=cc*a+j;
end;
convert10:=cc;
end;
热心网友 时间:2023-07-15 06:28
45d(16)=1117(10)
4*16^2+5*16^1+13*16^0
=1024+80+13
=1117