在Fortran编程中,可以使用`ABS`函数来表示一个数的绝对值。以下是一个简单的示例:
```fortran
program main
implicit none
real, parameter :: pi = 3.14159265358979323846
real :: a = -5.0
real :: b = 8.0
print *, "The absolute value of a is:", abs(a)
print *, "The absolute value of b is:", abs(b)
end program main
```
在这个示例中,`abs`函数用于计算变量`a`和`b`的绝对值,并将结果打印出来。
此外,Fortran还提供了其他一些求绝对值的方法,例如使用条件判断语句:
```fortran
program main
implicit none
real :: num = -5.0
if (num < 0) then
num = -num
end if
print *, "The absolute value of num is:", num
end program main
```
在这个示例中,我们使用`if`语句来判断`num`是否小于0,如果是,则取其相反数;如果不是,则保持原值。
总结起来,Fortran中求绝对值的主要方法有:
1. 使用`ABS`函数。
2. 使用条件判断语句。