우리는 매우 간단한 서브 루틴의 예를 제공합니다. 서브루틴의 목적은 두 정수를 교환하는 것입니다. Fortran 프로그램은 일반적으로 기본 프로그램(또는 드라이버)과 여러 하위 프로그램(프로시저 또는 서브루틴)으로 구성됩니다. 지금은 메인 프로그램에 모든 문을 배치합니다; 하위 프로그램은 나중에 처리됩니다. 주 프로그램의 구조는 처음 두 예제와 동일한 결과를 생성합니다. Fortran 90 코드의 이 예에서 프로그래머는 DO 루프 내에서 대량의 코드를 작성했습니다. 실행 시 지침이 화면에 인쇄되고 SUM 변수가 루프 외부에서 0으로 초기화됩니다. 루프가 시작되면 사용자에게 임의의 번호를 입력하도록 요청합니다. 이 숫자는 루프가 반복될 때마다 변수 SUM에 추가됩니다. 사용자가 입력0을 입력하면 EXIT 문이 루프를 종료하고 SUM 값이 화면에 표시됩니다. 공통 블록에 포함된 변수에는 데이터 문을 사용할 수 없습니다.

블록 데이터라는 이 목적을 위해 특별한 „서브 루틴”이 있습니다. 실제로 서브 루틴은 아니지만 별도의 프로그램 단위로 제공되기 때문에 약간 비슷해 보입니다. 다음은 동일한 식에서 서로 다른 데이터 형식이 발생하는 경우 형식 변환이 명시적으로 또는 암시적으로 수행되는 예입니다. 포트란은 암시적으로 일부 형식 변환을 수행합니다. 예를 들어 Fortran 77에는 실제 및 이중 정밀도라고 하는 부동 점 변수에 대해 두 가지 유형이 있습니다. 실제 계산은 종종 적절하지만 일부 수치 계산에는 매우 높은 정밀도가 필요하며 이중 정밀도를 사용해야 합니다. 일반적으로 실제 변수는 4바이트 변수이고 이중 정밀도는 8바이트이지만 이는 기계에 따라 다릅니다. 일부 비표준 Fortran 버전은 구문 real*8을 사용하여 8바이트 부동 포인트 변수를 나타냅니다. 마지막으로 행렬에는 m 행과 n 열이 있는 규칙이 붙어 있습니다.

인덱스 i는 행 인덱스(1~m)로 사용되고 인덱스 j는 열 인덱스(1~n)로 사용됩니다. 선형 대수학을 처리하는 대부분의 Fortran 프로그램은이 표기법을 사용하며 코드를 훨씬 쉽게 읽을 수 있습니다! 지금까지 우리는 주로 무료 형식 입력 / 출력을 사용했다.