exn543.m

来自「基天子matlab的双缝干涉从单缝(线光源)发出的单色光射到与之平行的双缝上」· M 代码 · 共 12 行

%《MATLAB及其在理工课程中的应用指南》(十一五规划版）第五章例5－4－3程序
% 数值积分求曲线长度
% 西安电子科技大学出版社出版  陈怀琛编著 2007年7月
%
n=input('分段数目n= '),   % 分段数目
x=linspace(-1,1,n+1);     % 设定等间隔x向量
y=sqrt(1-x.^2);           % 求y向量
plot(x,y),hold on         % 绘图，保持
Dx=diff(x);Dy=diff(y);    % 求各割线的x,y两方向长度
Ln=sqrt(Dx.^2+Dy.^2);     % 求各割线长度
L=sum(Ln)                 % 求各割线总长度