原创力文档- 1、本文档共11页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
计算实验课
高等数学计算实验题目一、一元微积分部分：
给定函数
f ?x??
画出 f(x)在区间[-4, 4]上图形；
5 ? x2 ? x3 ? x4
5 ? 5x ? x2
画出在区间[-4, 4]上 f(x)与 sin(x)f(x)的图形；
5x2 x3
5
x2 x3 x4
5 5 x x2
200
100
4
2
2
4
100
200
1. f x
5
x2 x3 x4
5 5 x x2
a .Plot
5
5
x2 x3 x4 ,
5 x
x2
x, 4, 4
a.(?Graphics?)
b
b .Plot
5
5 5 x
x2 x3 x4 ,
5
x2 x3 x4
Sin x
x2
5
5 x x2
,
x, 4, 4
150
100
50
4
2
50
2
4
100
150
b.(?Graphics?)
做出分段函数
f ?x
f ?x? ??
?
sin
1 , x ? 0 x
，的图形。
?? 0 , x ? 0
2. f x_
2. f x_ : x2 Sin
f x_ : 0 x 0
1
x
x 0
Plot f x , x, 5, 5
Set :: setrpt :
Cannot assign to raw object 0 in pattern 0 x_. More…
SetDelayed :: write : Tag Times in 0 2. is Protected . More…
$Failed
0.2
0.2
0.1
1
0.5
0.5
1
0.1
0.2
?Graphics?
求函数极限lim?1? 1 ?x ，并输出函数?1? 1 ?x 的图形。
? x ? ? x ?
x?? ? ? ? ?
3. f x
3. f x
1 1 x
x
Limit 1 1 x ^x, x
Set :: write : Tag Times in 3. f x is Protected . More…
1
1
x
x
?
Plot 1
Plot 1
1
x
x
, x, 10, 10
x
x
Plot :: plnr : 1
1
x
is not a
machine size real number at x 0.813241 . More…
x
Plot :: plnr : 1
1
x
is not a
machine size real number at x 0.919676 . More…
Plot :: plnr : 1
1
x
x
is not a
machine size real number at x 0.967106 . More…
General :: stop : Further
output
of Plot :: plnr
will
be suppressed during
this
calculation . More…
17.5
15
12.5
10
7.5
5
2.5
10
5
5
10
?Graphics?
作函数 sinx 及自复合函数的图形
sin ?sin ? ?sin x???, sin ?sin ? ?sin x???, sin ?sin ? ?sin x???,
5
f(x)=Sin[x] Plot[Sin[x],{x,-4?,4?}]
10 30
Set :: write : Tag Times in f x is Protected .
Set :: write : Tag Times in f x is Protected . More…
Sin[x]
10.5
1
0.5
30
20
10
10
20
30
0.5
?Graphics?
f(x)=Sin[Sin[Sin[Sin[Sin[x]]]]] Plot[Sin[Sin[Sin[Sin[Sin[x]]]]],{x,-4?,4?}]
Set :: write : Tag Times in f x is Protected . More…
Sin[Sin[Sin[Sin[Sin[x]]]]]
0.6
0.4
0.2
10
5
0.2
5
10
0.4
0.6
?Graphics?
?Graphics?
f(x)=Sin[Sin[Sin[Sin[Sin[Sin[Sin[Sin[Sin[Sin[x]]]]]]]]]]
Plot[Sin[Sin[Sin[Sin[Sin[Sin[Sin[Sin[Sin[Sin[x]]]]]]]]]],
{x,-4?,4?}]
Syntax :: noinfo : Input expression contains
insufficient information to interpret result . More…
文档评论（0）