下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(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 <<"請輸入第"<<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 << "請輸入時(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等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 2024年工業(yè)地產(chǎn)有償轉(zhuǎn)讓協(xié)議
- 2024年度南京二手房交易合同
- 2024年度水果交易合同模板
- 【初中生物】病毒教學(xué)課件2024-2025學(xué)年人教版生物七年級上冊
- 2024年度法律服務(wù)委托合同
- 2024年度工程監(jiān)理合同標(biāo)的及服務(wù)內(nèi)容具體描述
- 2024年工程勞務(wù)分包補(bǔ)充協(xié)議
- 2024個(gè)人向公司借款合同范本(簡單版)
- 2024冷卻塔填料生產(chǎn)工藝優(yōu)化合同
- 2024年度CFG樁基工程水土保持合同
- 三年級上冊美術(shù)課件-第7課 北京的胡同 ▏人美版(北京) (17張PPT)
- GB∕T 17888.3-2020 機(jī)械安全 接近機(jī)械的固定設(shè)施 第3部分:樓梯、階梯和護(hù)欄
- 房顫健康宣教課件
- 人教版八年級上Unit 6 I'm going to study computer science1 Section A (1a-1c)教案
- 一年級下冊數(shù)學(xué)教案 - 四 牧童-認(rèn)識圖形:《重疊問題》 青島版
- 家用電器常見認(rèn)證標(biāo)志一覽匯總(精選.)
- DB37 5155-2019 公共建筑節(jié)能設(shè)計(jì)標(biāo)準(zhǔn)
- 五年(2018-2022年)高考全國卷英語試題考點(diǎn)分析
- 試驗(yàn)室組織機(jī)構(gòu)圖
- T∕CSRME 001-2019 巖石動(dòng)力特性試驗(yàn)規(guī)程
- 從農(nóng)業(yè)機(jī)械化到農(nóng)業(yè)信息化、自動(dòng)化與智能化
評論
0/150
提交評論