请用fortran语言帮忙编写一下程序输入三角形三条边长A、B、C,先判断是否构成三角形,若能构成三角形则计算三角形三个角α、β、γ.编写程序实现之.提示:使用FORTRAN 95提供的反余弦标准函数A
来源:学生作业帮助网 编辑:作业帮 时间:2024/10/05 17:46:09
xV_OP*$&kn8I$-e.ٺ̢#"P ( 1a>8_>۽an{=;{noLrw8'҆iȚngaO2+ZU;yxPpU~~~+bXw-NE`n^ޱ
-{u-a;]i\-;7~EQOU,Ҫrϳva8}bUNP)G
?2/Jmkp~W쥽0~&5l12zsURXPg1`~r&*A`aNxUnj ߾|ԍtܐSxbEzZHɄ0LKk*'h O(I` ջn$4fFH)]dIrĔ6 xQ.!'S1cK=͐#T7|r> U:7xcuzjockZzej*4{6o5YIg(RfAJ`9
>N}G/<Wx|E@+<
F
ԯl\)\A:s:t~zet5&ᢽ!uD< ciL{"ϊ8)Đ3=Y~0;0!8C$k1*Q^D^ChD,emJe+
请用fortran语言帮忙编写一下程序输入三角形三条边长A、B、C,先判断是否构成三角形,若能构成三角形则计算三角形三个角α、β、γ.编写程序实现之.提示:使用FORTRAN 95提供的反余弦标准函数A
请用fortran语言帮忙编写一下程序
输入三角形三条边长A、B、C,先判断是否构成三角形,若能构成三角形则计算三角形三个角α、β、γ.编写程序实现之.
提示:使用FORTRAN 95提供的反余弦标准函数ACOS(x)或ACOSD(x).
请用fortran语言帮忙编写一下程序输入三角形三条边长A、B、C,先判断是否构成三角形,若能构成三角形则计算三角形三个角α、β、γ.编写程序实现之.提示:使用FORTRAN 95提供的反余弦标准函数A
代码如下,供参考:
program testimplicit none
real(8) :: a,b,c
real(8) :: angle_a,angle_b,angle_c
print*, 'a,b,c = '
read(*,*) a,b,c
if(a .le. 0.0 .or. b .le. 0.0 .or. c .le. 0.0) then
stop 'a,b,c must be >= 0'
end if
if(a + b .le. c .or. a + c .le. b .or. b + c .le. a) then
stop 'a,b,c can not form a triangle'
end if
angle_a = acos( (b**2 + c**2 - a**2)/(2.0*b*c) ) * 180.0/acos(-1.0)
angle_b = acos( (a**2 + c**2 - b**2)/(2.0*a*c) ) * 180.0/acos(-1.0)
angle_c = acos( (a**2 + b**2 - c**2)/(2.0*a*b) ) * 180.0/acos(-1.0)
print*, 'angle(a) = ',angle_a,'degree'
print*, 'angle(b) = ',angle_b,'degree'
print*, 'angle(c) = ',angle_c,'degree'
stop
end program
结果:
a,b,c =4 5 6
angle(a) = 41.4096209569432 degree
angle(b) = 55.7711321202143 degree
angle(c) = 82.8192419138864 degree
请用fortran语言帮忙编写一下程序输入三角形三条边长A、B、C,先判断是否构成三角形,若能构成三角形则计算三角形三个角α、β、γ.编写程序实现之.提示:使用FORTRAN 95提供的反余弦标准函数A
编写牛顿均差插值多项式的程序用fortran语言
用Fortran语言编写两个4*4矩阵乘的程序
怎样求最长连续降水日数用fortran程序编写,
Fortran语言小程序编写,请各路大神帮忙A文件中有K*N个数(K组数),逗号隔开排列.转换生成B文件,格式见下,每隔六组取一组数,每组数前加一行,两个数为3600*K/6 3600*K/6/M.还是不行,无法输出.我给
求教 fortran 高手! 怎么用fortran语言编写程序 用来构建一个三维网格我需要对一个平板进传热分析,先用fortran构建一个三维网格,然后用tecplot360读出三维模型.现在我的困惑时不知道怎么编写fort
帮忙看一下,这句英文怎么写?我用java语言编写了一个程序,名字叫myApp,我英文标注一下,证明软件是java编写的,应该是myApp for java 还是myApp by java 还是其他写法?
用牛顿切线法解决一个问题(方程)用fortran语言编写程序求高人能帮我编写一份啊.还有 用撕裂线法解决一个问题(方程组)
下列C语言程序哪有错误?用C语言编写编写程序哪有错误?
请问一下:什么叫B/S架构程序.B/S架构程序是什么用么语言编写的?我还想请问一下.一般B/S架构的程序是用什么语言编写的.?
在1到500中,找出能同时满足用3除余2,用5除余3,用7除余2的所有整数,并输出,编写程序实现之用Fortran语言
帮忙用C语言编写解一元二次方程 (ax)的平方+bx+c=0 的完整程序
用fortran语言编一个矩阵相乘的通用程序 急用
用fortran怎么编写牛顿迭代法
用c语言编写一个求三角形面积的程序
用C语言编写一个程序:从键盘输入n(0
用c语言编写程序计算5!+10!的值
用C语言编写程序,输入一个正整数n(1