C語言誤差處理(平均數(shù)、殘差)

1、#include#include#include#includedoubled100;doublex1=0.0,x2=0.0,x3=0.0,average=0.0;doubleT=63.66,9.92,5.84,4.60,4.03,3.71,3.50,3.36,3.25,3.17,3.11,3.05,3.01,2.98,2.95,2.92,2.90,2.88,2.86,2.85,2.83,2.82,2.81,2.80,2.79,2.78,2.77,2.76,2.76,2.75,2.70,2.68,2.66,2.65,2.64,2.63,2.63,2.58;doubleaverage_fun(d

2、oubledatas,intdatas_num)intk=0;for(k=0;kdatas_num;k+)average+=datask;average/=datas_num;returnaverage;doublesurplus(intnum,doublea,doublex)inti,j;doublec100,w;for(i=0;inum;i+)ci=ai-x;di=ci;printf(”求得的殘余誤差為:n)；for(j=0;jnum;j+)printf(%f,dj);for(i=0;inum/2.0*A)printf(”該算術(shù)平均值不正確!n);elseprintf(”該算術(shù)平均值正確!

3、n);elseif(w(num/2.0-0.5)*A)printf(”該算術(shù)平均值不正確!n);elseprintf(”該算術(shù)平均值正確!n);judge1(intnum)intt,j;doublem=0.0,n=0.0,z=0.0;if(num%2=0)t=num/2;for(j=0;jt;j+)m+=dj;for(j=t;jnum;j+)n+=dj;z=m-n;elset=(num+1)/2;for(j=0;jt;j+)m+=dj;for(j=t;jnum;j+)n+=dj;z=m-n;printf(%lf,z);if(z=0.002)printf(”無根據(jù)懷疑此組存在系統(tǒng)誤差n);els

4、eprintf(懷疑此組存在系統(tǒng)誤差5);std(intnum,doubledata)doublem=0.0;intk;for(k=0;knum;k+)m+=datak*datak;x1=sqrt(m/(num-1);x2=x1/(sqrt(num);voidjudge2(intw)inti;for(i=0;iw;i+)if(di3*x1)printf(”該數(shù)據(jù)存在粗大誤差n”)；elseprintf(”該數(shù)據(jù)不存在粗大誤差n”);limit(intnum)doublet=0.0;t=Tnum-1;x3=t*x2;bear(intdatas_num,doubledatas)doubley=0.

5、0,k=0.0;inti;for(i=0;idatas_num;i+)k+=datasi;k/=datas_num;y=k+x3;printf(”結(jié)果為:”)；printf(%lf,y);voidmain()intnum;實驗二不等進(jìn)度測量及評定inti;doublea100;doublex=0.0,w=0.0;printf(輸入實驗組數(shù)：”)；scanf(%d,&num);printf(輸入測得的數(shù)據(jù)：);for(i=0；inum；i+)scanf(%lf,&ai);for(i=0;inum;i+)printf(%lf,ai);printf(n);x=average_fun(a,num);printf(平均數(shù)為：n);printf(%lf,x);printf(殘余誤差為：n);w=surplus(num,a,x);check(num,w);judge1(num);std(num,d);judge2(num);limit(num);bear(num,a);實驗二不等進(jìn)度測量及評定在.6存汚anot統(tǒng)誤誤誤誤誤誤誤誤誤誤矣大犬大大犬大大大大土rrrjnrjnrjrrrjnrjnrjrrrjnrjrrrjnrjIhl一JTII-JrI-JIT-JTII-JTilJIT-JTII-JTil