fortran编写一个盛金公式解一元三次方程代码
代码语言:fortran
代码描述:fortran编写一个盛金公式解一元三次方程代码
下面为部分代码预览,完整代码请点击下载或在bfwstudio webide中打开
Module Shengjin_mod
Implicit None
contains
Function Cubic_equation(Co) Result (X)
!盛金公式求解一元三次方程
!默认浮点为8字节,以保证精度
Integer , Parameter :: P = Selected_Real_Kind(12)
Real (Kind=P), Parameter :: Eps = 1.0_P
Real (Kin.........完整代码请登录后点击上方下载按钮下载查看





网友评论0