



下載本文檔
版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領
文檔簡介
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ù)據(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 << "聲源坐標為:("<<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 <<"點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ù)據(jù)(us)與坐標數(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)系上傳者。文件的所有權益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
- 4. 未經(jīng)權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
- 6. 下載文件中如有侵權或不適當內容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 【借款協(xié)議】循環(huán)借款合同5篇
- 合伙共同經(jīng)營賓館合同6篇
- 合同管理崗位職責
- 用戶反饋與藥膏市場表現(xiàn)之間的關系-洞察闡釋
- 數(shù)字化社會空間極化的區(qū)域差異研究-洞察闡釋
- 電池壽命延長策略-第1篇-洞察闡釋
- GB/T 45574-2025數(shù)據(jù)安全技術敏感個人信息處理安全要求
- 網(wǎng)絡推廣服務協(xié)議適用于元起拍活動模板
- 合同范本之合同期滿個人工作總結模板
- 2025年辛酮項目立項申請報告
- GB/T 13262-1991不合格品率的計數(shù)標準型一次抽樣檢查程序及抽樣表
- 年產(chǎn)二十萬噸合成氨轉化工段設計
- 《煤礦安全規(guī)程》專家解讀(詳細版)
- DB63-T 1806-2020金屬非金屬露天礦山企業(yè)安全生產(chǎn)風險分級管控和隱患排查治理實施指南
- 供應過程的核算說課市公開課金獎市賽課一等獎課件
- 2023年海南省中考英語試題
- 智慧海南總體方案(2020-2025年)
- DG-TJ 08-2122-2021 保溫裝飾復合板墻體保溫系統(tǒng)應用技術標準
- SFR-SE-ARC-0031激光跟蹤設置-作業(yè)指導書
- 錄音棚、攝影棚、直播室設計方案
- 安全生產(chǎn)隱患排查概述PPT課件
評論
0/150
提交評論