见图，，，，讨教

syms t,x;
f1=exp(t)*cos(t);
Fx=int(f1,t,0,x);
f2=diff(Fx,x);
X1=double(solve(f2,x));
Y=subs(Fx,x,X1)
ezplot(Fx,[0,pi]),;hold on;
plot(X1,Y,'ro')

应该就是这样了，最后看出是极大值

不好意思，刚给的那个程序错的，偶把题目看错老，I　am awfully sorry..


[ 此贴被lifejoy在2007-07-09 22:13重新编辑 ]

Quote:

引用第1楼no44于2007-07-09 21:07发表的:
syms t,x;
f1=exp(t)*cos(t);
Fx=int(f1,t,0,x);
f2=diff(Fx,x);
X1=double(solve(f2,x));
.......

有问题，改为;
syms t x
f1=exp(t)*cos(t);
Fx=int(f1,t,0,x);
f2=diff(Fx,x);
X1=double(solve(f2,x));
Y=subs(Fx,x,X1)
ezplot(Fx,[0,pi]),;hold on;
plot(X1,Y,'ro')

另外你们两位的答案不一致哦

Quote:

引用第3楼jjc357于2007-07-09 21:56发表的:

有问题，改为;
syms t x
f1=exp(t)*cos(t);
Fx=int(f1,t,0,x);
.......

正解，为刚刚给楼主带来的麻烦道歉。。。。

积分再微分有什么用啊？？

积分是题目要求，而微分是为了求导数为0的点，故。。。。。。。

Quote:

引用第3楼jjc357于2007-07-09 21:56发表的:

有问题，改为;
syms t x
f1=exp(t)*cos(t);
Fx=int(f1,t,0,x);
.......

的确是这样啊～就差了一点，多谢蝈蝈提醒～

恩，是对的

太强了,还这么热心.真的很感谢

double是什么意思啊？

给你一个参考：
syms t x;
F=exp(t)*cos(t);
F=int(F,t,0,x);
ezplot(F,[0,pi]);hold on;
F=inline(-F);
[x0,y0]=fminbnd(F,0,pi)
plot(x0,-y0,'*r');

附图如此：