高精度加法

原创 2007年10月02日 11:00:00
program GJPLus;
var
 s1,s2,s3,st,s:string;
 i,j,k,l1,l2,li,n1,n2,n3,n4:integer;
begin
readln(s1);
readln(s2);
l1:=length(s1);
l2:=length(s2);
if l1>l2 then li:=l1 else li:=l2;
n4:=0;
for i:=1 to li do begin
       if i<=l1 then Val(copy(s1,(l1+1-i),1),n1,j) else n1:=0;// writeln(n1);
       if i<=l2 then Val(copy(s2,(l2+1-i),1),n2,j) else n2:=0;// writeln(n2);
 n3:=n1+n2+n4;
 if n3>=10 then begin
  n4:=n3 div 10;
  n3:=n3 mod 10;
 end else n4:=0;
        str(n3,st);
        insert(st,s3,256-i);
end;
{
if l1>=li then begin
 for i:=(li+1) to l1 do begin
                Val(copy(s1,l1+1-i,1),n1);
  n2:=0;
  n3:=n1+n2+n4;
  if n3>=10 then begin
   n4:=n3 div 10;
   n3:=n3 mod 10;
  end else n4:=0;
         str(n3,st);
         insert(st,s3,li+i);
 end;
        str(n4,st);
        insert(st,s3,li+i-1);
end else if l2>=li then begin
 for i:=(li+1) to l2 do begin
                Val(copy(s2,l2+1-i,1),n2);
  n1:=0;
  n3:=n1+n2+n4;
  if n3>=10 then begin
   n4:=n3 div 10;
   n3:=n3 mod 10;
  end else n4:=0;
        str(n3,st);
        insert(st,s3,li+i);
 end;
        str(n4,st);
        insert(st,s3,li+i-1);
end;
}
//output
k:=length(s3);
li:=0;
for i:=1 to k do begin
val(copy(s3,k-i+1,1),j);
if j>0 then li:=li+1;
if li>0 then write(j);
end;
readln;
end.
 

C语言-高精度加法

  • 2014年11月13日 09:41
  • 686B
  • 下载

高精度加法的C++实现

  • 2010年12月06日 18:51
  • 936B
  • 下载

用C++实现高精度加法运算

先说说高精度运算的概念: 是指参与运算的数(加数,减数,因子……)范围大大超出了标准数据类型(整型,实型)能表示的范围的运算。例如,求两个200位的数的和。这时,就要用到高精度算法了。(摘自百度百科)...
  • highyon
  • highyon
  • 2016年03月31日 09:56
  • 7562

高精度加法

  • 2012年11月27日 22:11
  • 697B
  • 下载

hdu1250高精度加法

  • 2010年03月19日 08:40
  • 2KB
  • 下载

整数高精度运算的库(加法,减法,乘法,除法,取模)

这几天开始做些ACM的Online Judge题目,遇到了个数据范围有10^100的题目,原题 是求两个整数的最小公倍数,没用高精写好算法后发现需要的运算类型比较多,基本除了加法没用到其他的都要,于是...
  • hiiiiiu
  • hiiiiiu
  • 2011年05月28日 18:26
  • 2439

高精度加法、减法、乘法和除法

  • 2008年10月28日 21:28
  • 979KB
  • 下载

高精度加法和减法的编程实现

无论是加法还是减法,读入的两个数都是正整数,计算的结果根据实际运算结果情况保存到数组中。 对于数据的读取,可以是字符串,也可以是整数 对于计算结果,我这里不超过80位(可以修改) 两个数相加的程序...

信息奥赛高精度加法

  • 2015年10月19日 21:57
  • 264KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:高精度加法
举报原因:
原因补充:

(最多只允许输入30个字)