高精度模板 高精度数比较大小 #calc num operator +(num a,num b);//高精度加法 #calc num operator -(num a,num b);//高精度减法 #calc num operator *(num a,int b);//高精度单精度乘法 #calc num operator /(num a,int b);//高精度单精度除法 #calc num operator *(num a,num b);//高精度高精度乘法 #calc int opera
高精度运算代码
高精度乘法:
计算的位数:
if lena mod 40 then slena:=(lena div 4)+1 else slena:=lena div 4;
if lenb mod 40 then slenb:=(lenb div 4)+1 else slenb:=(lenb div 4);
1.四位一存,边存边删:
k:=lb;
for i:=1 to lb do
begin
if i=lb then val(b1,b[i],l) else
begin
val(copy(b