附合导线计算程序设计.doc

附合导线计算程序设计.doc

ID:51172656

大小:21.50 KB

页数:5页

时间:2020-03-19

附合导线计算程序设计.doc_第1页
附合导线计算程序设计.doc_第2页
附合导线计算程序设计.doc_第3页
附合导线计算程序设计.doc_第4页
附合导线计算程序设计.doc_第5页
资源描述:

《附合导线计算程序设计.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、5附合导线计算程序设计#include#definePI3.1415926#include#defineLENsizeof(structnode)#includestructzuobiao{doublex;doubley;};structangle{intdegree;intminute;floatsecond;};structnode{doublex;doubley;structangleang1;structanglefwj;doubles;doubledx;doubledy;structnode*next;};do

2、ublejtod(structanglejiao){doubledegree;degree=jiao.degree;degree+=(jiao.minute/60.0);degree+=(jiao.second/3600.0);returndegree;}structangledtoj(doublejiaodu){structanglefwj;fwj.degree=floor(jiaodu);fwj.minute=floor((jiaodu-floor(jiaodu))*60);fwj.second=((jiaodu-floor(jiaodu))*60-fwj.minute

3、)*60;returnfwj;}doublejtoh(structanglejiaodu){doublehu;hu=jtod(jiaodu);hu=hu*PI/180;returnhu;}main(){FILE*fp;structzuobiaozb0,zbN;structnode*head,*p1,*p2;structangleangle1,f0,fB,fN;intn,i;doublet,fBsecond,jiaodu;doublefX=0,fY=0,K=0,S=0;fB.degree=0;fB.minute=0;fB.second=0;if((fp=fopen("d:\

4、pro\data2.txt","r"))==NULL)printf("cannotopenthisfile");fscanf(fp,"%d",&n);fscanf(fp,"%lf%lf",&zb0.x,&zb0.y);fscanf(fp,"%d%d%f",&f0.degree,&f0.minute,&f0.second);fscanf(fp,"%lf%lf",&zbN.x,&zbN.y);fscanf(fp,"%d%d%f",&fN.degree,&fN.minute,&fN.second);fB.degree=f0.degree;fB.minute=f0.minut

5、e;fB.second=f0.second;fBsecond=jtod(fB);for(i=0;i360)fBsecond-=360;if(fBsecond<0)fBsecond+=360;}fBsecond-=jtod(fN);fBsecond*=3600;printf("%lf",fBsecond);fBsecond/=-n;

6、rewind(fp);for(i=0;i<11;i++)fscanf(fp,"%lf",&t);head=p1=p2=(structnode*)malloc(LEN);//fscanf(fp,"%d%d%f",&p1->fwj.degree,&p1->fwj.minute,&p1->fwj.second);for(i=0;iang1.degree,&p1->ang1.minute,&p1->ang1.second);p1->ang1.second+=fBsecond;if(p1->ang1.second>=60

7、){p1->ang1.second-=60;p1->ang1.minute+=1;if(p1->ang1.minute>=60){p1->ang1.minute-=60;p1->ang1.degree+=1;}}if(p1->ang1.second<0){p1->ang1.second+=60;p1->ang1.minute-=1;if(p1->ang1.minute<0){p1->ang1.minute+=60;p1->ang1.degree-=1;}}p2->next=p1;p2=p1;p1=(structno

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。