数学应用软件实验报告(mathematica实验程序)1_第1页
数学应用软件实验报告(mathematica实验程序)1_第2页
数学应用软件实验报告(mathematica实验程序)1_第3页
数学应用软件实验报告(mathematica实验程序)1_第4页
全文预览已结束

下载本文档

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

文档简介

徐州工程学院数理学院数学应用软件实验报告课程(实验序号)数学应用软件实验1实验地点、日期数学建模机房2011年2月23日主要仪器设备计算机使用的软件名称Mathematica实验类型演示性实验验证性实验综合性实验√设计性实验研究性实验班级:姓名:孙娅学号:20090402223一、实验题目名称:函数】变量和表达式二、实验目的:理解变量和算式、内核与前端处理器构成的人机对话系统,了解计算的精度问题个Mathematica使用中的几个问题。熟练掌握数的表示和计算、常用数学函数,会绘制简单函数的图形。通过上机初步了解数学应用软件,Mathematica的各种界面。三、实验内容:练习题11.计算下列各式的数值:(1)Log[2,10]Log[10]/Log[2](2)Sqrt[Pi^2+1](3)Log[10,3264]Log[3264]/Log[10](4)/2(5)Cos[135^0]Cos[1](6)Sin[Pi^2/2]Sin[2/2](7)ArcSin[1/2]/6(8)200!788657867364790503552363213932185062295135977687173263294742533244359449963403342920304284011984623904177212138919638830257642790242637105061926624952829931113462857270763317237396988943922445621451664240254033291864131227428294853277524242407573903240321257405579568660226031904170324062351700858796178922222789623703897374720000000000000000000000000000000000000000000000000(9)Tan[0.2]0.20271(10)ArcTan[E*Pi]ArcTan[](11)Sqrt[E^(-I*Pi)+1]0(12)Sin[I*Pi]+0.10.1+11.54872.计算下列各式到20,50,100位精度:(1)N[E^,20]27.028944477141255522N[E^,50]27.028944477141255521577956431681151958455966211657N[E^,100]27.02894447714125552157795643168115195845596621165710278696529650944712351446871377330372045381382290(2)N[Log[6,],20]0.46449571560274166890N[Log[6,],50]0.46449571560274166890337499506327267917626872513479N[Log[6,],100]0.4644957156027416689033749950632726791762687251347942316352599038136285649281232736836042255399202610(3)N[E^(-I*Pi^2)-1,20]-1.9026853619330710662+0.4303012170000922665N[E^(-I*Pi^2)-1,50]-1.9026853619330710661604083033424539727776919081625+0.4303012170000922664576757059938998460652783715357N[E^(-I*Pi^2)-1,100]-1.902685361933071066160408303342453972777691908162539434912928996783299436757627346093796057323583627+0.4303012170000922664576757059938998460652783715357154656783424229728579898118436271698860654348267843.作e^sinx在[-2,2]上的图,作e^(-x^2-y^2)sin(10xy)在[-4,4]上的图,再作你感兴趣的其它图形。Plot[Sin[1/x],{x,-1,1}]Plot[E^(Sin[x]),{x,-2,2}]Plot3D[E^(-x^2-y^2)*Sin[10*x*y],{x,-4,4},{y,-4,4}]Plot3D[Sin[x*y],{x,-Pi,Pi},{y,-Pi,Pi}]四、总结及心得体会:刚开始学习Mathematica需要多练习一些小题目,对一些比较基本的语句和命令要反复多做几次

温馨提示

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

评论

0/150

提交评论