Question

高精度计算的单精度乘法

Answer 1

单精度乘法是计算范围次于高精度乘法的一种运算，只是运算效率略比高精度计算低。
单精度乘法过程样例：
const
maxcount=进制位
maxlen=记录高精度数组大小
procedure mulnum(a:bignum;x:longint;,var c:bignum);
var
i:longint;
begin
fillchar(c,sizeof(c),0);c[0]:=a[0];
for i:=1 to c[0] do c[i]:=a[i]*x;
for i:=1 to c[0] do {进位}
begin
inc(c[i+1],c[i] div maxcount);
c[i]:=c[i] mod 10;
end;
while c[c[0]+1]>0 do
begin
inc(c[0]);
inc(c[c[0]+1],c[c[0]] div maxcount);
c[c[0]]:=c[c[0]] mod maxcount;
end;
end;