1.12. МАССИВЫ

Массив – это упорядоченный набор фиксированного количества элементов. Все компоненты массива принадлежат к одному типу, называемому базовым типом для массива. Массив относится к однородным структурам с прямым доступом. То есть выделение конкретной компоненты массива осуществляется по индексу массива.

Количество индексов в массиве определяет его размерность, и массивы могут быть, соответственно, одномерными, двумерными, трехмерными и т.д. Каждый массив должен быть описан в начале программы с помощью оператора размерности DIMENSION с указанием предельных значений каждого индекса, которые задаются целыми константами. Это необходимо для того, чтобы зарезервировать соответствующий объем памяти для хранения элементов массива.

Число измерений массива в среде Compaq Visual Fortran не должно превышать 7.

Пример:

При попытки описания массива размерности большей 7, например, в среде Compaq Visual Fortran, DIMENSION T(2,2,2,2,2,2,2,2) возникает ошибка компиляции Error: There are too many dimensions; the maximum rank is 7. Dimension T(2,2,2,2,2,2,2,2)

DIMENSION A (10, 30), BK (500), IU (3:40)

Здесь первый массив – двумерный, а второй и третий – одномерные. Первый индекс в массиве А изменяется от 1 до 10, второй от 1 до 30. Во втором и третьем массивах индексы изменяются, соответственно, от 1 до 500 и от 3 до 40. Если не указана нижняя граница изменения индекса, то она принимается равной 1.

Описание размерности массива может быть совмещено с описанием типа переменных. Поэтому запись

REAL KA, KLF

INTEGER R1, RS

DIMENSION KA(15,15), KLF(100), R1(10), RS(5,5)

эквивалентна записи

INTEGER KLF(100), RS(5,5)

REAL KA(15,15), R1(10)

INTEGER(2), DIMENSION(5):: D

Однако следует отметить, что описание массива в программе может быть произведено только один раз.