1 / 38
文档名称:

密立根油滴实验.doc

格式:doc   大小:753KB   页数:38页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

密立根油滴实验.doc

上传人:cjrl214 2019/3/11 文件大小:753 KB

下载得到文件列表

密立根油滴实验.doc

文档介绍

文档介绍:这个程序是我将c语言用在处理大物实验的数据上,心里很激动,言归正传,这个程序是处理密立根油滴实验数据的c语言程序,这个程序经过我反复的修改与验证,不但能准确计算实验结果,而且赋予了它智能化,能判断误差大的实验数据,还能将数据结果存入c盘下的txt新建文件夹中,方便将字体放大查看,或存入手机中查看!好了,多的我就不说了,大家用了就知道了!我上传的文档分为::油滴次数第一组第二组第三组第四组第五组V/vt/sV/vt/sV/vt/sV/vt/sV/vt/:::(所测油滴带的电荷)值:(所测油滴含有的元电荷个数)值:n=q/×10-19求得:n1=6n2=8n3=16n4=5n5=:e=q/n; : e=(e1+e2+e3+e4+e5)/5=×10-:Ue=e-e标=(-)×10-19=×10-19(c):Ee=Ue/e标=×10-19/×10-19=%:e=(±)×10-19(c)Ee=%::下面是程序源代码:#include<>#include<>voidreadwriteDat();intlkj(doubleq){ doublek;intn1;n1=(int)q; k=q; k=k-n1; if(k<) n1=n1; else n1=n1+1; returnn1;}doubleabc(){ doubleq,t,v,m,n,h,e,l;doublet1,t2,t3,t4,t5; doublev1,v2,v3,v4,v5; doublet11,tfm,v11,t12,n1,y; FILE*wf; intk,s,po; wf=fopen("c:\\","w"); printf("\t\t\t\t密立根油滴实验\n"); printf("温馨提示:所输入时间的单位为:秒,电压单位为:伏\n"); printf("第一组数据:\n\n");fprintf(wf,"\t\t\t\t密立根油滴实验\n第一组数据:\n\n");lkh:printf("请输入第一组数的5个时间,5个时间之间以空格间隔,输完最后一个请按回车\n"); scanf("%lf%lf%lf%lf%lf",&t1,&t2,&t3,&t4,&t5); fprintf(wf,"所输入的五个时间值%.2f\t%.2f\t%.2f\t%.2f\t%.2f\n",t1,t2,t3,t4,t5);if(t1<5&&t1>16&&t2<5&&t2>16&&t3<5&&t3>16&&t4<5&&t4>16&&t5<5&&t5>16) { printf("所测数据的时间不在5<t<16,将导致误差大,请重新输入\n");gotolkh; }printf("请输入第一组数的5个电压,5个电压之间以空格间隔,输完最后一个请按回车\n"); scanf("%lf%lf%lf%lf%lf",&v1,&v2,&v3,&v4,&v5); fprintf(wf,"所输入的5个电压值%.0f\t%.0f\t%.0f\t%.0f\t%.0f\n",v1,v2,v3,v4,v5);if(v1<100&&v1>400&&v2<100&&v2>400&&v3<100&&v3>400&&v4<100&&v4>400&&v5<100&&v5>400) { printf("所测数据的电压不在100<v<400,将导致误差大,请重新输入\n");gotolkh; } t=(t1+t2+t3+t4+t5)/5; t12=(t1+t2+t3+t4+t5)/5; t11=(t1+t2+t3+t4+t5); n=t; v=(v1+v2+v3+v4+v5)/5; h=v; v11=v1+v2+v3+v4+v5;m=sqrt(t); t=t*(1+*m); t=t