5.2.12. Структура программы

Программа на языке Fortran – последовательность операторов и комментариев, описывающих алгоритм решения задачи.

Существует две формы записи Fortran-программ: традиционная, фиксированная форма и свободная, характерная для последних версий Fortranа. Основное отличие состоит в следующем: в традиционной форме в одной строке записывается только один оператор, в свободной – в одной строке могут размешаться несколько разделённых точкой с запятой (;) операторов (только для Fortran – 90).

Fortran-программа должна обладать следующими свойствами: быть читаемой и поддерживаемой.

Читаемая – это программа, которая может быть почти сразу понятна тем, кто не знает языка Fortran. Это значит, что программа снабжена достаточным количеством комментариев, имена переменных продуманы, а текст программы написан так, чтобы был понятен.

Для того, чтобы текст был понятен, мы будем записывать в строке один оператор, который описывает действие соответствующего символа схемы вычислений.

Например: в символе Процесс переменной Z присваивается значение В² + А – 1 , тогда в программе это действие описывается оператором присваивания:

Z = B**2 + A – 1

Операторы будем писать большими (заглавными) буквами, а комментарий – малыми.

Поддерживаемая программа – это прежде всего читаемая программа, в которой можно легко обнаружить ошибки. Существуют правила, которыми пользуются при написании программы. Приведем некоторые из них.

Имена переменных следует выбирать таким образом, чтобы они были связаны с величинами, которые они представляют.

Скобки используются для придания большей ясности программы.

При записи операторов и выражений можно использовать пробелы. Например: оператор присваивания будет лучше читаться, если перед и после знака оператора «=» поставить по одному пробелу.

При записи структурных конструкций используется «правило рельефа», состоящее в том, что расположенные внутри конструкции операторы записываются правее, образующих эту структуру операторов.

5.2.13. Программирование алгоритмов разветвленной структуры

Номер примера указан в соответствии с номером схемы вычислений данной задачи, разработанной в пункте 4.1. Разветвляющиеся вычислительные процессы.

Пример 3. Написать программу вычисления Z = max(A,B,C).

Алгоритм вычисления разобран в п. 4.1, схема вычисления представлена на рис.3. Имена переменных в программе выбраны в соответствии со схемой.

Исходные данные А,В,С – переменные действительного типа. Введем их с помощью оператора ввода READ с клавиатуры под управлением списка. Под управлением списка выведем на дисплей и результат, переменную Z.

Для вычисления промежуточной переменной R и переменной результата Z используем структурный логический оператор IF.

Для читаемости снабдим программу комментариями. Заметим, что содержание комментариев определяется автором.

* Вычисление Z = max(A,B,C)

* Ввод исходных данных А,В,C

READ (*,*) A,B,C

* Вычисление R = max(A,B)

IF ( A>= B) THEN ! или IF(А .GE.B) THEN

R = A

ELSE

R = B

ENDIF

* Вычисление Z = max(R,C)

IF(R >= C) THEN ! или IF(R .GE.C) THEN

Z = R

ELSE

Z = C

ENDIF

* Печать результата

WRITE(*,*) ' Z= ',Z

STOP

END