Вот пример сообщения «Hello, World!» программа на Фортране:

program HelloWorld
  ! Prints "Hello, World!" to the console
  write(*,*) "Hello, World!"
end program HelloWorld

Эта программа использует оператор writeдля печати строки «Hello, World!» на консоль. *в операторе writeявляется сокращенной записью стандартного вывода.

Вот еще несколько способов написать «Hello, World!» программа на Фортране:

Метод 1. Использование массива символов

program HelloWorld
  ! Prints "Hello, World!" to the console using a character array
  character(14) :: message = "Hello, World!"
  write(*,*) message
end program HelloWorld

Метод 2. Использование подпрограммы

program HelloWorld
  ! Prints "Hello, World!" to the console using a subroutine
  call PrintHelloWorld()
contains
  subroutine PrintHelloWorld()
    write(*,*) "Hello, World!"
  end subroutine PrintHelloWorld
end program HelloWorld

Метод 3. Использование функции

program HelloWorld
  ! Prints "Hello, World!" to the console using a function
  write(*,*) GetHelloWorld()
contains
  function GetHelloWorld() result(message)
    character(14) :: message = "Hello, World!"
  end function GetHelloWorld
end program HelloWorld

Это всего лишь несколько примеров того, как можно написать «Hello, World!» программа на Фортране. Каждый метод демонстрирует свой подход к достижению одного и того же результата.