2.3 FORTRAN的语言特性
FORTRAN从一开始就是为数值计算而设计的。它的语法尽可能接近数学符号：
fortran
复制代码
PROGRAM QuadraticEquation
IMPLICIT NONE
REAL :: a, b, c, discriminant, root1, root2
WRITE(*,*) 'Enter coefficients a, b, c:'
READ(*,*) a, b, c
discriminant = b**2 - 4.0*a*c
IF (discriminant >= 0.0) THEN
root1 = (-b + SQRT(discriminant)) / (2.0*a)
root2 = (-b - SQRT(discriminant)) / (2.0*a)
WRITE(*,*) 'Roots:', root1, root2
ELSE
WRITE(*,*) 'No real roots'
END IF
END PROGRAM QuadraticEquation关键特性包括：
- 数组操作：FORTRAN 90引入了数组整体操作，如
A = B + C可直接操作整个数组 - 复数类型：内置
COMPLEX数据类型，这是许多其他语言所没有的 - 精度控制：通过
KIND参数精确控制浮点数的精度