全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
关于如何运用计算机进行高次高精运算,笔者研究后写出如下vbs代码,可计算较小整数的高次运算,输入底数与指数,1、2、千次方运算可以在3、4秒内完成,如果改用c+或其他编程语言编译成.exe或.com文件,会有更高的执行效率,因为vbs 是便翻译边执行的,浪费了大量时间。复制如下代码到记事本中,保存时文件名改为*.vbs 然后双击文件即可运行。a=InputBox(底数)b=InputBox(指数)Dim aa(100000)c=100000e=100main(b)d=cDod=d-1Loop Until aa(d)0 Or d=1For zz=1 To d Step 1If aa(zz)10 Thenqwe=aa(zz) & qweElse If aa(zz)0 Thenqwe=0 & aa(zz) & qweElse qwe=00 & qweEnd IfEnd IfNextMsgBox(qwe)Set ws=WScript.CreateObject(WScript.Shell)Set fso=WScript.CreateObject(Scripting.FileSystemObject)Set fi=fso.CreateTextFile(结果.txt,True)fi.Write(qwe)fi.Close sub main(x) 递归主程序MsgBox(1)if x=0 Thenaa(1)=1else if x mod 2 = 0 Thenmain(x/2)chengElse main(x-1)achengend Ifend IfMsgBox(11)end SubSub cheng() 平方过程,幂次加倍MsgBox(cheng)dim bb(100000)Dim dd=cDod=d-1Loop Until aa(d)0 Or d=1for i=1 To d for j=1 To d bb(i+j-1)=aa(i)*aa(j) + bb(i+j-1) nextNextfor i=1 to c if bb(i)e then bb(i+1)=bb(i)e + bb(i+1) bb(i)= bb(i) mod e end ifNextfor i=1 to caa(i)=bb(i)NextMsgBox(1cheng)end Subsub acheng() 乘以底数,幂次加一MsgBox(acheng)For i=1 to caa(i)= aa(i)*aNextfor i=1 to c if aa(i)e Then aa(i+1)=aa(i)e + aa
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2024年水利工程行业技能考试-水工监测工笔试参考题库含答案
- 2024年机械制造行业技能考试-聚乙烯焊工笔试参考题库含答案
- 2024年机械制造行业技能考试-天车工笔试参考题库含答案
- 油气水输送管材专用料项目商业计划书及实施方案|瑞克咨询|2024年编制|
- 垃圾分类桶项目可行性研究报告及运营方案|瑞克咨询|2024年编|
- 2024年服务行业技能考试-珠宝首饰营业员笔试参考题库含答案
- 2024年建设工程质量检测人员-建设工程质量检测人员(门窗检测)笔试参考题库含答案
- 2024年广西住院医师-广西住院医师急诊科笔试参考题库含答案
- 2024年岗位知识竞赛-华能网络培训班组长岗位知识笔试参考题库含答案
- 2024年安徽住院医师-安徽住院医师口腔修复科笔试参考题库含答案
- 阿里城市大脑解决方案
- 思想政治教育学原理整套课件完整版电子教案课件汇总(最新)
- 4G、5G通信基站建设租赁项目可行性研究报告建议书
- 加油站重大风险清单
- A公司白糖期货点价+期权套期保值案例分析
- 五年级下册小学数学《分数的加法和减法》单元作业设计
- 口腔诊所工作流程图
- 食品工程实验中心实验室安全教育知识题库与答案
- 浅谈基于大数据诊断分析下的“精准教学”
- 信息安全技术保障措施的建设运行与使用管理等情况
- 天蓝色商务发展历程时间轴PPT模板课件
评论
0/150
提交评论