双曲正弦函数计算编程

《双曲正弦函数计算编程》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、#include#includemain(){doublea=0,a1,a2,a3,a4,M1,Q1;a1=cosh(a)*cos(a);a2=0.5*(sin(a)*cosh(a)+cos(a)*sinh(a));a3=sinh(a)*sin(a)*0.5;a4=0.25*(sin(a)*cosh(a)-cos(a)*sinh(a));printf("a=%.2fa1=%.4fa2=%.4fa3=%.4fa4=%.4f",a,a1,a2,a3,a4);M1=38016*a1+29236*

2、a2-86345*a3+100600*a4;printf("M1=%.0f",M1);Q1=9648*a1-28494*a2+40239.9*a3-50181*a4;printf("Q1=%.0f",Q1);doubleb=0.1,b1,b2,b3,b4,M2,Q2;b1=cosh(b)*cos(b);b2=0.5*(sin(b)*cosh(b)+cos(b)*sinh(b));b3=sinh(b)*sin(b)*0.5;b4=0.25*(sin(b)*cosh(b)-cos(b)*sinh(b));printf("b

3、=%.2fb1=%.4fb2=%.4fb3=%.4fb4=%.4f",b,b1,b2,b3,b4);M2=38016*b1+29236*b2-86344.6*b3+100600*b4;printf("M2=%.0f",M2);Q2=9648*b1-28494*b2+40239.9*b3-50181*b4;printf("Q2=%.0f",Q2);doublec=0.15,c1,c2,c3,c4,M3,Q3;c1=cosh(c)*cos(c);c2=0.5*(sin(c)*cosh(c)+cos(c)*sinh(c)

4、);c3=sinh(c)*sin(c)*0.5;c4=0.25*(sin(c)*cosh(c)-cos(c)*sinh(c));printf("c=%.2fc1=%.4fc2=%.4fc3=%.4fc4=%.4f",c,c1,c2,c3,c4);M3=38016*c1+29236*c2-86344.6*c3+100600*c4;printf("M3=%.0f",M3);Q3=9648*c1-28494*c2+40239.9*c3-50181*c4;printf("Q3=%.0f",Q3);doubled=0.17,

5、d1,d2,d3,d4,M4,Q4;d1=cosh(d)*cos(d);d2=0.5*(sin(d)*cosh(d)+cos(d)*sinh(d));d3=sinh(d)*sin(d)*0.5;d4=0.25*(sin(d)*cosh(d)-cos(d)*sinh(d));printf("d=%.2fd1=%.4fd2=%.4fd3=%.4fd4=%.4f",d,d1,d2,d3,d4);M4=38016*d1+29236*d2-86344.6*d3+100600*d4;printf("M4=%.0f",M4);Q4=

6、9648*d1-28494*d2+40239.9*d3-50181*d4;printf("Q4=%.0f",Q4);doublee=0.2,e1,e2,e3,e4,M5,Q5;e1=cosh(e)*cos(e);e2=0.5*(sin(e)*cosh(e)+cos(e)*sinh(e));e3=sinh(e)*sin(e)*0.5;e4=0.25*(sin(e)*cosh(e)-cos(e)*sinh(e));printf("e=%.2fe1=%.4fe2=%.4fe3=%.4fe4=%.4f",e,e1,e2,e3,

7、e4);M5=38016*e1+29236*e2-86344.6*e3+100600*e4;printf("M5=%.0f",M5);Q5=9648*e1-28494*e2+40239.9*e3-50181*e4;printf("Q5=%.0f",Q5);doublef=0.23,f1,f2,f3,f4,M6,Q6;f1=cosh(f)*cos(f);f2=0.5*(sin(f)*cosh(f)+cos(f)*sinh(f));f3=sinh(f)*sin(f)*0.5;f4=0.25*(sin(f)*cosh(f)-

8、cos(f)*sinh(f));printf("f=%.2ff1=%.4ff2=%.4ff3=%.4ff4=%.4f",f,f1,f2,f3,f4);M6=38016*f1+29236*f2-86344.6*f3+100600*f4;printf("M6=%.0f",