巧用数组实现长整数的精确计算毕业论文

巧用数组实现长整数的精确计算毕业论文

ID:23522853

大小:54.50 KB

页数:5页

时间:2018-11-08

巧用数组实现长整数的精确计算毕业论文_第1页
巧用数组实现长整数的精确计算毕业论文_第2页
巧用数组实现长整数的精确计算毕业论文_第3页
巧用数组实现长整数的精确计算毕业论文_第4页
巧用数组实现长整数的精确计算毕业论文_第5页
资源描述:

《巧用数组实现长整数的精确计算毕业论文》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、巧用数组实现长整数的精确计算毕业论文摘要:本文阐述了利用数组实现长整数的算法关键词:数组算法VBAbstract:UsearraytorealizetheprecisecalculateoflongtegerKeyeticVB1、前言我们都知道,计算机的一个最重要的功能就是进行科学计算。利用一些标准的数学函数和运算符号可以进行任何复杂的数学运算,数学运算对计算机来说当然也是十分轻松的事情。但由于计算机内存空间的限制等原因,计算机在计算很大的数据时,往往是用科学记数法表示。比如在VB6.0和其他的一些高级编程语言中,计

2、算机所能处理的长整数的范围是从-2,147,483,648到2,147,483,647。也就是说超出这个范围的整数计算机就不能处理甚至不能识别了,那时计算机就会把数据转换为科学记数法后再进行处理,比如1.398865E19,它表示1.398865乘以10的19次方。假如我们需要知道两个很大的整数相乘的精确结果呢?看起来是很难实现,因为计算机不支持很长的位数计算。然而,我们只要愿意去做,拿一张纸和一枝笔一步一步地进行人工计算,最后总能得到精确结果.我们能不能把我们人工计算的方法告诉计算机,让计算机来完成这些计算工作呢?

3、答案是肯定的。我们可以找出一个算法,让计算机来模拟我们人工计算的方式进行计算,并且也不会超出计算机的整数计算范围。本文就是通过对人工计算步骤的分析和模拟,最后找出一个算法,用高级语言实现长整数的精确计算。2、人工计算步骤的分析和模拟首先我们来分析一下人工进行乘法计算的过程。例如:347×78=27066a347b×78c12776c22429c27066为了便于说明,我们用a表示被乘数,用b表示乘数,用c表示结果。并且把个位数定义成第一位,十位数定义成第二位,依次类推。(转载自z位依次去乘a的各位,中间结果放在cm中

4、,最后的cm要累加进结果c中,而且cm的第n位要累加在c的第nm-1中。4.把c1、c2……cm都累加成结果c,最后c的值就是a乘b的积。这里有一点要注意,当用b的第m位去乘a中的第k位时,有可能产生进位,这时的进位要累加在cm的第k1位,也就是最后结果c中的nmk中。3、程序算法:现在我们来总结人工计算的算法,告诉计算机怎么按这个算法去计算。前文已经提过,太长的整数计算机不能处理,所以我们首先要解决输入和输出的问题。我们知道,计算机不能处理很长的整数,但能处理很长的字符串。所以我们把输入和输出都转换成数字型字符串来

5、处理。同时字符串没有数字计算的能力,所以我们还要把字符串分拆成一个一个的数字,这样计算机就既能计算,又能处理很长的数据了。我们定义三个可变数组a(),b()和c(),其中a()存放被乘数的每一位,最低位(个位数)放在a(1)中,同样地,b()存放乘数的每一位,c()存放结果。由于c1、c2、一直到最后一个中间结果最终都要累加进结果c中,所以我们在程序中可以直接把中间结果cm直接累加到结果c()中,实际上c()中的每一单元都是一个累加器,当一个单元c(n)中的结果大于9时,我们把c(n)对10的余数放在c(n)中,把c

6、(n)整除10的结果累加进c(n1)中,这样就实现了进位处理。用乘数b的每一位去乘被乘数a的各位时,我们设计一个循环,依次取出b的每一位。循环变量设为I,I从1递增到b1(最高位),步长为1。(l去乘a的各位数,我们也设计一个循环,依次取出a的各位。循环变量设为J,J从1递增到a1(最高位),步长为1。这样利用这个双重循环就可以计算到a和b的每一位。把结果都累加进c()中的相应位中,最后从高位到低位逐位输出数组c就得到我们所要的长整数乘积。源程序如下:Dima(),b(),c()AsByte'定义输入和输出数组Sub

7、Main()ts="整数乘法"xx=InputBox("请输入被乘数:",ts)Ifxx=""ThenEndyy=InputBox("请输入乘数",ts)Ifyy=""ThenEnda1=Len(xx)'取xx的位数b1=Len(yy)'取yy的位数c1=a1b1'确定结果的最大位数ReDima(a1),b(b1),c(c1)'重定义数组Fori=1Toaa(i)=Mid(xx,a1-i1,1)'给数组a的每一位赋值IfNotIsNumeric(a(i))Then'检查输入的合法性MsgBox"被乘数输入错误",,t

8、sEndEndIfNextiFori=1Tob1b(i)=Mid(yy,b1-i1,1)'给数组b的每一位赋值IfNotIsNumeric(b(i))Then'检查输入的合法性MsgBox"乘数输入错误",,ts

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。