ch04-函数.pptVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第四章 函数 带子程序的C程序 函数 程序设计实例 求玉米产量 具体程序 #include stdio.h #include math.h #define xa 547 #define ya 411 #define xb 804 #define yb 77 #define xc 39 #define yc 208 #define xd 116 #define yd 332 float ab, bd, ad, bc, cd ; float s, s1 ,s2,ss,m; void main(void) { // 主函数 // 计算一个三角形面积 ab=sqrt( (xa-xb)*(xa-xb)+(ya-yb)*(ya-yb) ); //边ab长 bd=sqrt( (xb-xd)*(xb-xd)+(yb-yd)*(yb-yd) );//边bd长 ad=sqrt( (xa-xd)*(xa-xd)+(ya-yd)*(ya-yd) );//边ad长 s=(ab+bd+ad)/2; s1=sqrt( s*(s-ab)*(s-bd)*(s-ad) );//△ABD面积 bc=sqrt( (xb-xc)* (xb-xc)+(yb-yc)* (yb-yc) );//边BC长 cd=sqrt( (xc-xd)* (xc-xd)+(yc-yd)* (yc-yd) );//边CD长 s=(bc+bd+cd)/2; s2=sqrt( s*(s-bc)*(s-bd)*(s-cd) ); // △BCD面积 ss=s1+s2; // 总面积S=S1+S2 ss=ss/1000; // 折合成亩 m=ss*950; // 计算总产量 printf(“m=%10.3f\n”,m); // 打印输出 } 重写程序 #include stdio.h //1 #include math.h //2 float xa,ya,xb,yb,xc,yc,xd,yd; //3 float s1,s2,ss,m; //4 /* 计算r、s两点距离:参数:r点x、y坐标,s点x、y坐标 */ float liners( float xr,float yr,float xs,float ys ){ //5 return sqrt( (xr-xs)*(xr-xs)+(yr-ys)*(yr-ys) ); //6 } //7 /* 计算三角形uvw面积,参数:u点x、y坐标,v点x、y坐标,w点x、y坐标 */ float areauvw(float xu,float yu, float xv,float yv, float xw,float yw ){ // 8 float uv , uw , vw ; // 三条边长 //9 float s ; //10 uv = liners ( xu, yu, xv, yv ); //边uv长 //11 uw = liners ( xu, yu, xw, yw ); //边uw长 //12 vw = liners ( xv, yv, xw, yw ); //边vw长 //13 s=(uv+uw+vw)/2; //s //14 return sqrt( s*(s-uv)*(s-uw)*(s-vw) );//面积//15 } void main(void) { // 主函数 printf(please input xa,ya,xb,yb, xc,yc,xd,yd:\n); //18 scanf(%f%f%f%f%f%f %f%f ,xa,ya, xb,yb,xc,yc,xd,yd); //19 s1 = areauvw (xa, ya, xb, yb, xd, yd ); //20 s2 = areauvw (xb, yb, xc, yc, xd, yd ); //21 ss=s1+s2; //22 ss=ss/1000; // 折合成亩 //23

文档评论(0)

叶倾城 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档