Вычисление экспоненты на Фортране: примеры кода и подходы

В Фортране функция EXPиспользуется для вычисления экспоненты заданного значения. Вот несколько методов вычисления возведения в степень на Фортране, а также примеры кода:

Метод 1: использование внутренней функции EXP

program exponential
  implicit none
  real :: x, result
  x = 2.0   ! Example value
  result = EXP(x)
  print *, "Exponential of", x, "is", result
end program exponential

Метод 2: использование оператора степени (“)

program exponential
  implicit none
  real :: x, result
  x = 2.0   ! Example value
  result = exp(x)
  print *, "Exponential of", x, "is", result
end program exponential

Метод 3: использование функции DEXPиз математической библиотеки Фортрана (libm)

program exponential
  implicit none
  real :: x, result
  external dexp
  x = 2.0   ! Example value
  result = dexp(x)
  print *, "Exponential of", x, "is", result
end program exponential

Метод 4: использование аппроксимации рядами Тейлора

program exponential
  implicit none
  real :: x, result, term, sum
  integer :: i
  x = 2.0   ! Example value
  sum = 1.0
  term = 1.0
  do i = 1, 10   ! Number of terms in the series
     term = term * x / real(i)
     sum = sum + term
  end do
  result = sum
  print *, "Exponential of", x, "is", result
end program exponential

В приведенных выше примерах переменная xпредставляет значение, для которого вы хотите вычислить экспоненту. Полученное экспоненциальное значение сохраняется в переменной result, а затем выводится на консоль.