利用MATLAB软件编写辛普森求积公式程序
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
a=input('a=?');
b=input('b=?');
x0=(a+b)/2;
f=[0 0 0];
f(1)=a^2*cos(a);
f(2)=x0^2*cos(x0);
f(3)=b^2*cos(b);
s=((b-a)/6)*(f(1)+4*f(2)+f(3))
a=input('a=?');
b=input('b=?');
x=a:(b-a)/2:b
f=(x.^2).*cos(x)
s=((b-a)/6)*(f(1)+4*f(2)+f(3))
a=?1
b=?2
x =
1.0000 1.5000
2.0000
f =
0.5403 0.1592 -1.6646
s =
-0.0813
function [C,D]=newpoly(X,Y)
X=[0.4 0.55 0.65 0.8 0.9 1.05];
Y=[0.41075 0.51875 0.69675 0.88811 1.02652 1.25382]; %X=[1 2 3];
Y%=[4 5 7];
n=length(X);
d=zeros(n,n);
D(:,1)=Y'
for j=2:n
for k=j:n
D(k,j)=(D(k,j-1)-D(k-1,j-1))/(X(k)-X(k-j+1));
end
end
C=D(n,n)
for k=(n-1):-1:1
C=conv(C,poly(X(k)));
m=length(C)
C(m)= C(m)+D(k,k);
C
end