Mathematica编程.doc_第1页
Mathematica编程.doc_第2页
Mathematica编程.doc_第3页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

班级: 学号: 姓名: 成绩:_实 验 报 告实验3 Mathematica编程3.1 实验目的 通过本实验了解Mathematica编程的基本概念,掌握Mathematica中程序设计的一般方法。 培养编程与上机调试能力。3.2 实验内容3.2.1 编写一个程序,用以寻求边长为相邻整数,面积也为整数的三角形。 算法描述:n从2到1000a = n-1; b = n; c = n+1p=(a+b+c)/2若 p-a0且p-b0且p-c0TS=Sqrt(p*(p-a)*(p-b)*(p-c)FContinue若S为整数T输出a,b,c3.2.2 编写程序,输入两个正整数,用“辗转相除法”求它们的最大公约数。 辗转相除法: (1) 以大数m作被除数,小数n做除数,相除后余数为r。 (2) 若r 0,则m n,n r,继续相除得到新的r。若仍有r 0,则重复此过程,直到r = 0为止。 (3) 最后的n就是最大公约数。 算法描述:输入m,n大数放入m,小数放入n 求m / n的余数 m n n r直到 r = 0输出m 输出最大公约数3.2.3 编写程序,求Fibonacci数列的前20项 Fibonacci数列的定义: 据此给出算法描述,并编程。3.3 实验步骤1、打开mathematica。2、对照实验要求,编写对应代码。3、运行修改。4、保存。3.3.1 代码

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论