迈克尔逊干涉仪Word下载.docx
- 文档编号:18914540
- 上传时间:2023-01-02
- 格式:DOCX
- 页数:10
- 大小:1.13MB
迈克尔逊干涉仪Word下载.docx
《迈克尔逊干涉仪Word下载.docx》由会员分享,可在线阅读,更多相关《迈克尔逊干涉仪Word下载.docx(10页珍藏版)》请在冰豆网上搜索。
31.70046
31.71728
31.73402
31.75091
缩进
31.47001
31.45342
31.43753
31.42128
31.40479
31.38869
2.下面是我写的实验报告的数据处理部分:
(1)冒出Δd1的计算:
(2)缩进Δd2的计算:
(3)Δd的计算
(4)波长λ的计算
(5)相对误差的计算
E=|λ测量-λ标准|/λ标准
(6)绝对误差的计算
Δλ=Eλ测量
(7)测量结果:
λ=λ±
Δλ=(6.6±
0.3)×
102nm
E=4.3%
3.下页是我运行的结果:
4.下面是程序源代码:
#include<
stdio.h>
math.h>
doublemax(doublef)
{
doublek,l,g;
k=f;
l=(int)f;
l=k-l;
l=l*10;
g=l;
l=(int)l;
g=g-l;
g=g/10;
if(g>
=0.05)
f=f;
else
f=f+0.1;
returnf;
}
main()
{
floatd0,d1,d2,d3,d4,d5;
floatd10,d11,d12,d13,d14,d15;
doublem,h,j,e,f,x,n,cd,ab,ef,gh,q,p1,p2,m2;
FILE*wf;
printf("
\t\t\t迈克尔逊干涉测波长的C语言程序\n"
);
温馨提示:
所输数据单位必须为:
mm\n"
请依次输入冒出的d0,d1,d2,d3,d4,d5五个数以空格间隔,即输完第一个数,按空格再输第二个数,输完d5请按回车\n"
qw:
scanf("
%f%f%f%f%f%f"
&
d0,&
d1,&
d2,&
d3,&
d4,&
d5);
wf=fopen("
c:
\\新建文件夹.txt"
"
w"
fprintf(wf,"
所输入的d0,d1,d2,d3,d4,d5依次为:
\t%.5f\t%.5f\t%.5f\t%.5f\t%.5f\t%.5f\n"
d0,d1,d2,d3,d4,d5);
if(d0>
0&
&
d1>
d2>
d3>
d4>
d5>
0)
{
ab=d0+d1+d2;
cd=d3+d4+d5;
m=cd-ab;
m=m/9;
p1=m;
if(m<
printf("
\n冒出与缩进输反了,系统已经进行智能化处理,下面输缩进,也要输成冒出的数据\n"
}
m=fabs(m);
请依次输入缩进的d10,d11,d12,d13,d14,d15五个数以空格间隔,即输完第一个数,按空格再输第二个数,输完d5请按回车\n"
er:
d10,&
d11,&
d12,&
d13,&
d14,&
d15);
if(d10>
d11>
d12>
d13>
d14>
d15>
{
gh=d10+d11+d12;
ef=d15+d14+d13;
n=gh-ef;
n=n/9;
p2=n;
if(n<
printf("
冒出与缩进输反了,系统已经进行智能化处理,不会影响测量结果\n"
fprintf(wf,"
}
n=fabs(n);
h=(m+n)/2;
j=2*h/50;
j=j*10000;
m2=j*100;
e=j-6.328;
q=e*100;
f=fabs(e);
f=f/6.328;
f=f*100;
if(j>
6.0116&
j<
6.6444)
if(p1>
p2>
printf("
\n冒出:
Δd1=%fmm\n缩进:
Δd2=%fmm\nΔd=%fmm\n"
m,n,h);
波长λ=%4.2fnm\n相对误差:
e=%4.1f%s\n绝对误差k=%4.1fnm\n"
m2,f,"
%"
q);
\n\n测量结果:
\n波长λ=(%3.1f±
%3.1f)e+002nm\n\n相对误差e=%4.1f%s\n"
j,e,f,"
\n注释:
e+002表示10的平方"
\n:
冒出Δd1=%fmm\n缩进:
fclose(wf);
}
else
printf("
n,m,h);
fprintf(wf,"
else
所测数据误差太大\n"
输入有误,请重新输入\n"
gotoer;
gotoqw;
5.下面是数据输出文件(将计算结果存入txt文件中,便于将字体放大阅读或存入手机中阅读,程序默认将数据输出文件存入c盘的新建文件夹中)
(1)缩进与冒出顺序正确:
迈克尔逊干涉测波长的C语言程序
31.6669931.6839131.7004631.71728
31.7340231.75091
冒出:
Δd1=0.016761mm
缩进:
Δd2=0.016244mm
Δd=0.016503mm
波长λ=6.6e+002nm
相对误差:
e=4.3%
绝对误差k=27.3nm
(2)缩进与冒出顺序输反的情况:
迈克尔逊干涉测波长的C语言程序
31.4700131.4534231.4375331.42128
31.4047931.38869
冒出与缩进输反了,系统已经进行智能化处理,下面输缩进,也要输成冒出的数据
冒出与缩进输反了,系统已经进行智能化处理,不会影响测量结果
测量结果:
波长λ=(6.6±
0.3)e+002nm
相对误差e=4.3%
注释:
e+002表示10的平方
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 迈克 干涉仪