粗大误差处理程序（Gross error processing program）.docVIP

粗大误差处理程序（Gross error processing program） #包括 stdio. h #包括数学。” #包括程序。” 整数，n； 双A [ 20 ]，v [ 20 ]，C，A1，A2，A3，K，G，R，R1，R2； 无效laiyite()； 无效roman()； 无效geluobusi()； 无效dikesong()； 双平均（双ARR []，int m）； 双bzhch（双前[ ]，int m）； 无效kzhi（int n1）； 无效gzhi（int N2）； 无效rzhi（int N3，双数组[]，int n）； 无效main() { 整数n； printf（“\n *****************************粗大误差处理**************************** \n \n”）； printf（“请输入数据个数：”）； scanf（“%d”，和N）； printf（“\n请？输？入？数簓据Y：”）； 为（i = 0；i ；；+（+）） scanf（“% LF”，和一个[我]）； S：{ printf（“\n \n ***************************菜单************************** \n”）； printf（“T T T1。莱以特准则\n\n T T T2。罗曼洛夫斯基准则ò\n\n T T T3。格罗布斯准则\n\n T T T4。狄克松准则\n”）； printf（“********************************************************** \n”）； printf（“\n请选择判别的准则：[ ] \ B B”）； scanf（“%d”，和N）； 开关（n） { 案例1：laiyite()；打破； 案例2：roman()；打破； 案例3：geluobusi()；打破； 案例4：dikesong()；打破； } printf（“\n \n要继续吗\ T1。继续2。退出？[ \\“b”）； scanf（“%d”，与W）； 开关（W） { 案例1：转到； 案例2：突破； } } } 无效laiyite() / / 1。莱以特准则 { 双B； L1：{ 平均（a，n）； B = bzhch（a，n）； 为（i = 0；i ；；+（+）） [ i ]； 为（i = 0；i ；；+（+）） { v i（abs）； 如果（3） { printf（“\n剔除值残余误差：% % 8.3lf剔除值8.3lf \n”，V [我]，一个[我]）； 因为（我； [ i = A [ i + 1 ]； “= 0”； n； 转到L1； } } } printf（“\n标准差：% 8.3lf \n”，B）； printf（“\n输出最后数值：”）； 为（i = 0；i ；；+（+）） printf（“% 8.3lf”，一个[我]）； } 无效roman() / / 2。罗曼洛夫斯基准则 { 双T＝100，x [ 20 ]，B，万福，B2，总和= 0，S2； int D； printf（“\n请？输？入？显？著？度è：阰”）； scanf（“% LF”，与A1）； 为（i = 0；i ；；+（+）） [我]； L2：{ kzhi（N）； 为（i = 0；i ；；+（+）） { 如果（x i t） { [我]； =我； } } 对于（i = d；i ；+；+ +） x [ i = x [ i + 1 ]； x = n-1 \ \ 0； 平均（x，n-1）； B2 = bzhch（x，n）； 如果（ABS（t-ave） K×B2） { printf（“\n输出K值：阰%如果n，k）； printf（“\n剔除值：% 8.3lf \n”，T）； printf（“\n输出最后数值：阰”）； 为（i＝0；i n-1；i + +） printf（“% 8.3lf”，x [我]）； n； T＝100； 转到L2； } } } 无效geluobusi() / / 3。格罗布斯准则 { int，D2； 双分钟= 100，最大值为0，ave1，B3，G1，G2，x [ 20 ]； printf（“\n请输入显著度：”）； scanf（“% LF”，与A2）； 为（i = 0；i ；；+（+）） [我]； L3：{ ave1 =平均（x，n）； B3 = bzhch（x，n）； 为（i = 0；i ；；+（+）） { 如果（x i 分钟） { min = x [ i ]； D1＝i； } 如果（x i max max） { max [ x ]； D2 = i； } } G1 =（ave1-x [ 1 ]）、B3； G2 =（X [D