高精度运算(加减).docVIP

高精度计算(一) 教学目标 了解什么是高精度计算。为什么要进行高精度计算。 熟练掌握基本的加、减高精度计算 重点难点分析 高精度数的存储方式； 教具或课件 使用多媒体演示文稿 主要教学过程 引入新课 利用计算机进行数值计算,有时会遇到这样的问题:有些计算要求精度高,希望计算的数的位数可达几十位甚至几百位,虽然计算机的计算精度也算较高了,但因受到硬件的限制,往往达不到实际问题所要求的精度.我们可以利用程序设计的方法去实现这们的高精度计算.这里仅介绍常用的几种高精度计算的方法。 教学过程设计 1、高精度计算中需要处理好以下几个问题: （1）数据的接收方法和存贮方法 数据的接收和存贮:当输入的数很长时,可采用字符串方式输入,这样可输入数字很长的数,利用字符串函数和操作运算,将每一位数取出,存入数组中. Type numtype=array[1..500]of word；{整数数组类型} Var a，b:numtype； {a和b为整数数组}la，lb:integer； {整数数组a的长度和b的长度}s:string； {输入数串} 将数串s转化为整数数组a的方法如下：readln(s); la:=length(s)； for i:=1 to la do a[la-i+1]:=ord(s[i])-ord(‘0’); 另一种方法是直接用循环加数组方法输入数据. Type arr= array[1..100] of integer; prucedure readdata(var int:arr); var ch:char; i,k:integer; begin read(ch);k:=0; while ch in[0..9] do begin inc(k);int[k]:=ord(ch)-ord(‘0’); read(ch); end; end; 储存数据一律用数组。根据不同的需要，数据的储存可分正向与反向两种。 以输入数1234为例： ①正向储存：数位权的大小与储存数组的下标的大小一致 下标大 下标小 数组各元素 a[4] a[3] a[2] a[1] 所存的数字 1 2 3 4 最高位 最低位 ②反向储存：数位权的大小与储存数组的下标的大小相反 下标小 下标大 数组各元素 a[1] a[2] a[3] a[4] 所存的数字 1 2 3 4 最高位 最低位 加法、减法、乘法的运算是从低位开始的，所以数据储存采取正向储存比较方便。 (2) 计算结果位数的确定 ①两数之和的位数最大为较大的数的位数加1。 ②乘积的位数最大为两个因子的位数之和。 (3) 进位,借位处理 加法进位: C[i]:= A[i]+B[i]; if C[i]=10 then begin C[i]:= C[i] mod 10; C[i+1]:= C[i+1]+1 end; 减法借位: if a[i]b[i] then begin a[i+1]:=a[i+1]-1;a[i]:=a[i]+10 end c[i]:=a[i]-b[i] 乘法进位: x:= A[i]*B[j]+ x DIV 10+ C[i+j-1]; C[i+j-1] := x mod 10; (4) 商和余数的求法 商和余数处理:视被除数和除数的位数情况进行处理. 2、高精度计算举例 【例1】 从键盘读入两个正整数，求它们的和。 分析：从键盘读入两个数到两个变量中，然后用赋值语句求它们的和，输出。但是，我们知道，在pascal 语言中任何数据类型都有一定的表示范围。而当两个被加数据大时，上述算法显然不能求出精确解，因此我们需要寻求另外一种方法。在读小学时，我们做加法都采用竖式方法，如图1。 这样，我们方便写出两个整数相加的算法。 8 5 6 + 2 5 5 --------------- 1 1 1 1 图1 如果我们用数组A、B分别存储加数和被加数，用数组C 存储结果。则上例有 A[1]=6, A[2]=5, A[3]=8, B[1]=5,B[2]=5, B[3]=2, C[4]=1,C[3]=1, C[2]=1,C[1]=1,两数相加如图2所示。 A3 A2 A1 +B3 B2 B1 ----------------- C4 C3 C2 C1 图2 因此，算法描述如下： procedure add(a,b;var c);