



下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡介
1、1、 聲源定位:#include <iostream>#include <cmath>using namespace std;#define c 2982#define pai 3.1415926535int main()double x0,x1,x2,y0,y1,y2,t0,t1,t2,t3,A,B,D,angle1,angle2,dt1,dt2,r;x0=0,x1=0,x2=0.3;y0=0,y1=0.45,y2=0.45;int i = 8;while(i-)cout <<"請(qǐng)輸入第"<<8-i<<"
2、;組時(shí)間數(shù)據(jù)"<< endl;cin >> t0 >> t1 >> t2>> t3;t0 = t0 / 1000000;t1 = t1 / 1000000;t2 = t2 / 1000000;dt1 = t0 - t2;dt2 = t1 - t2;A = x2*(pow(x1,2)+pow(y1,2)-pow(c*dt1,2) - x1*(pow(x2,2)+pow(y2,2)-pow(c*dt2,2);B = y2*(pow(x1,2)+pow(y1,2)-pow(c*dt1,2) - y1*(pow(x2,2)+pow(
3、y2,2)-pow(c*dt2,2);D = c*dt1*(pow(x2,2)+pow(y2,2)-pow(c*dt2,2) - c*dt2*(pow(x1,2)+pow(y1,2)-pow(c*dt1,2);angle2 = atan(B/A);if(acos(D/sqrt(pow(A,2)+pow(B,2)+angle2 < pai/2)angle1 = acos(D/sqrt(pow(A,2)+pow(B,2)+angle2;elseangle1 = angle2 - acos(D/sqrt(pow(A,2)+pow(B,2);r = (pow(x1,2)+pow(y1,2)-po
4、w(c*dt1,2)/(2*(x1*cos(angle1)+y1*sin(angle1)+c*dt1);cout << "聲源坐標(biāo)為:("<<r*cos(angle1)*1000<<"mm"<<" , "<<r*sin(angle1)*1000<<"mm)"<<endl; / end while;return 0; / end main;2、 GPS模擬#include <iostream>#include <cm
5、ath>#include <iomanip>using namespace std;#define c 2982#define min 0.0000000001void GPS(double x10 , double y10 , double t10 , double x1 , double y1 , int num)double a1,a2,a3,a4,b1,b2,mult,D=0,E=0;int i;while(1)a1 = a2 = a3 = a4 = b1 = b2 = 0;for(i = 0; i < 10; i +)a1 = a1-(3*pow(xi-x1)
6、,2)+pow(yi/1000-y1),2)-pow(c*ti/1000000,2);a2 = a2+2*(xi/1000-x1)*(y1-yi/1000);a3 = a2;a4 = a4-(3*pow(yi-y1),2)+pow(xi/1000-x1),2)-pow(c*ti/1000000,2);b1 = b1+(pow(xi/1000-x1),2)+pow(yi/1000-y1),2)-pow(c*ti/1000000,2)*(x1-xi/1000);b2 = b2+(pow(xi/1000-x1),2)+pow(yi/1000-y1),2)-pow(c*ti/1000000,2)*(y
7、1-yi/1000); /end for;mult = a3/a1;a4 -= a2*mult;b2 -= b1*mult;E = b2/a4;D = (b1-a2*E)/a1;x1 += D;y1 += E;if(pow(D,2)+pow(E,2) < min)break; / end while;x1 = x1*1000;y1 = y1*1000;cout <<"點(diǎn)P"<< num <<"定位于: X = "<< fixed << setprecision(8)<< x1;
8、cout <<"(mm) , Y = "<< fixed << setprecision(8)<< y1 <<"(mm)"<<endl; / end GPS;int main()int yy;double t110 , t210 , t310 , x10 , y10;cout << "請(qǐng)輸入時(shí)間數(shù)據(jù)(us)與坐標(biāo)數(shù)據(jù)(mm):" << endl;int i;for(i = 0; i <= 9; i +)cout << "第" << i+1 << "組:" << endl;cin >> t1i >> t2i >> t3i &
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 簽署房產(chǎn)放棄協(xié)議書
- 苗木種植安全協(xié)議書
- 裝飾勞務(wù)分包協(xié)議書
- 職工公寓合建協(xié)議書
- 稅務(wù)機(jī)關(guān)執(zhí)行協(xié)議書
- 購買工廠合同協(xié)議書
- 碩士外語考試預(yù)備常識(shí)試題及答案
- 2025客運(yùn)合同格式范本
- 造師考試復(fù)習(xí)策略試題及答案
- 2025租房合同大全范文
- 1-如何做好今年中考語文的復(fù)習(xí)備考
- 精神病學(xué)課件軀體治療(精神病學(xué))
- FeNO測(cè)定及應(yīng)用演示版課件
- 考試焦慮主題班會(huì)課件
- 冀教版五年級(jí)下冊(cè)美術(shù)第12課《寓言成語故事多》課件
- 英語演講Artificial intelligence人工智能課件共課件
- 建設(shè)工程防滲漏驗(yàn)收檢查表
- 鐵皮石斛 組織培養(yǎng) 栽培 試驗(yàn) 實(shí)驗(yàn)
- 中國聯(lián)通cBSS系統(tǒng)使用培訓(xùn)-第一部分
- 貨幣的起源與發(fā)展
- 森林防火PPT課件
評(píng)論
0/150
提交評(píng)論