В Фортране функция 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, а затем выводится на консоль.