ФОРТРАН

— язык программирования, ориентированный на описание инженерных и научных задач. Один из первых языков программирования. Разработан в 1956 (США) для систем автомат, программирования на ЭЦВМ. Транслятор с Ф. на язык машины опробован в 1956. С тех пор появился ряд вариантов Ф., из которых наиболее известны Ф.-П, Ф.-IV и их обобщения, разработанные амер. ассоциацией стандартов.

Идеи, заложенные в языке Ф., нашли развитие в более поздних языках АЛГОЛ-60, АЛГОЛ-68, ПЛ-1 и др. Вместе с тем до настоящего времени Ф. остается самым распространенным: он прост в изучении, написании программ и их отладке, а трансляторы с него на языки машин весьма экономичны. Наличие транслятора с Ф., обеспечивающее пользователю доступ к мировой библиотеке программ, созданной на базе этого языка, практически обязательно для любой неспециализированной ЭЦВМ.

Алфавит языка включает в себя 26 лат. заглавных букв, цифры, точку, запятую, круглые скобки, знаки арифм. операций: +, -, , /, (знак возведения в степень), знаки логических операций: операций отношения: изображаемые, как правило, сочетаниями букв. Кроме того, в качестве осн. символов в язык введен ряд слов: IF (если), DO (делай), GO ТО (перейди к ), ASSIGN (присвой), READ (читай), WRITE (пиши), PRINT (печатай), PUNCH (перфорируй) и т. д.

В средства языка включены такие простейшие понятия, как число, переменная величина, сравнение, цикл, переходы в программе, способы ввода информации в память машины, способы печати. Для приказов о вводе и выводе информации из машины в программу включают операторы ввода — вывода. Для некоторых из них нужно указывать, в каком «формате» следует вводить или выводить информацию.

Так, оператор READ N, L вводит информацию с перфокарт, определяя значения переменных списка L, при этом оператор FORMA Т с меткой N определяет для него, как эти значения нанесены на перфокарте: к-во позиций, тип величин. При печати совершенно аналогично оператор FORMA Т определяет для оператора PRINT N, L разметку строки на бумаге и форму представления элементов L в

строке. Скажем, при печати величины А требуется занять десять позиций с начала строки, представить А как вещественное число (без порядка, фиксированное) с двумя знаками после запятой. Это можно указать так:

Существенным понятием в языке Ф. является понятие подпрограмм. Ф.-программа компонуется из отдельных подпрограмм, которые могут транслироваться независимо друг от друга и вызываться по мере надобности с помощью оператора CALL или по названию, упомянутому в выражении. Каждая из подпрограмм имеет свой заголовок: имя и список параметров. Передача информации между подпрограммами осуществляется через параметры и общие переменные, которые в подпрограммах в этих случаях следует описать в операторе COMMON, напр.:

Принцип построения конструкций языка Ф. можно проиллюстрировать следующим примером программы выбора максимального числа (назовем его BIG) из любого наперед заданного набора N чисел Значение и сами числа заданы на перфорационных картах, каждое число занимает 6 столбцов карты:

Колода 3-х карт данных:

Числовой материал по приказу READ прочитывается с перфокарт как элементы числового вектора А, макс. длина которого указывается после слова DIMENSION. Строка интерпретируется как приказ выполнить последовательно для группу строк (операторов) вплоть до строки с меткой 5. Строка IF (BIG — интерпретируется как условный переход в программе на строки с метками 3 или 5 в за висимости от того, является разность отрицательной, равной нулю или положительной. Вследствие работы программы в этом случае будет напечатано на бумаге:

Лит.: Me Gracken D. D. Aguide to FORTRAN programming. New York - London, 1961; МакКракен Д., Дорн У. Численные методы в программирование на ФОРТРАНЕ. Пер. с англ. М., 1969. В. П. Шириков.