FORTRAN (Formula Translation) — это язык программирования, разработанный в 1950-х годах для научных и инженерных приложений. Это язык высокого уровня, что означает, что его легче читать и писать по сравнению с языками низкого уровня, такими как ассемблер.
FORTRAN до сих пор используется в научных, инженерных и математических приложениях, особенно в таких областях, как прогнозирование погоды, анализ методом конечных элементов и вычислительная гидродинамика.
FORTRAN известен своей эффективностью и скоростью, что делает его подходящим для выполнения сложных вычислений и моделирования. Многие научные и инженерные коды были написаны на FORTRAN и используются до сих пор.
Помимо использования в научных и инженерных приложениях, FORTRAN также используется в финансовой индустрии для финансового моделирования и анализа рисков. Он также используется в автомобильной промышленности для разработки систем управления транспортными средствами и в аэрокосмической промышленности для проектирования и анализа самолетов и космических кораблей.
Несмотря на продолжающееся использование FORTRAN, его популярность превзошли другие языки программирования, такие как C, C++ и Python. Тем не менее, FORTRAN остается ценным инструментом для тех, кто работает в научных и инженерных областях, и, вероятно, он будет использоваться еще много лет.
Вот несколько примеров кода FORTRAN, который вы можете запустить на онлайн-компиляторе:
- Привет, мир!
Это простая программа, которая печатает "Hello, World!" на экран.
PROGRAM HELLO
PRINT *, "Hello, World!"
END PROGRAM HELLO
- Числа Фибоначчи
Эта программа вычисляет числа Фибоначчи, используя цикл. Последовательность Фибоначчи — это ряд чисел, в котором каждое число является суммой двух предыдущих чисел, начиная с 0 и 1.
PROGRAM FIBONACCI
IMPLICIT NONE
INTEGER :: N, I, F0, F1, F
N = 10 ! Number of Fibonacci numbers to calculate
F0 = 0 ! First two numbers in the sequence
F1 = 1 PRINT *, F0
PRINT *, F1
DO I = 3, N
F = F0 + F1 ! Next number in the sequence is the sum of the previous two
PRINT *, F
F0 = F1 ! Shift the previous two numbers
F1 = F
END DO END PROGRAM FIBONACCI
- Умножение матриц
Эта программа умножает две матрицы и выводит результат на экран.
PROGRAM MATRIX_MULTIPLY IMPLICIT NONE INTEGER :: N, M, P, I, J, K REAL :: A(10,10), B(10,10), C(10,10)
N = 3 ! Number of rows in matrix A M = 3 ! Number of columns in matrix A and rows in matrix B P = 3 ! Number of columns in matrix B
! Initialize matrices A and B DO I = 1, N DO J = 1, M A(I,J) = I + J B(I,J) = I - J END DO END DO
! Multiply matrices A and B DO I = 1, N DO J = 1, P C(I,J) = 0.0 DO K = 1, M C(I,J) = C(I,J) + A(I,K) * B(K,J)
END DO END DO END DO
! Print result DO I = 1, N
DO J = 1, P
PRINT *, C(I,J)
END DO
END DO
END PROGRAM MATRIX_MULTIPLY
``
Чтобы запустить эти примеры в онлайн-компиляторе, вы можете использовать веб-сайт, например https://re . Просто скопируйте и вставьте код в редактор и нажмите «Run it».