Указывает, что функция обрабатывает все массивы указанного базового типа независимо от их размера, индексации, способа выделения памяти (статически или динамически).

Многомерные динамические массивы

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

type TMessageGrid = array of array of string;

var Msgs: TMessageGrid;

объявляет двумерный массив строк. Для создания такого массива вызывайте SetLength с двумя целыми параметрами. Например, если I и J – переменные целого типа,

SetLength(Msgs,I,J);

распределяет массив I-на-J элементов, а Msgs[0,0] обозначает элемент этого массива.

ПРИМЕР

1. Преобразовать вещественный массив Y(N)={0.2, -7.8, 2.5, -6.3, 1.3, 5.9, 4.4, 7.8, 0.3} в массив V по формуле V_j= cos Y_j, где N=9. Оформить подпрограмму преобразования массива Y в массив V.

2. Заменить положительные элементы массива V их кубами, а отрицательные – наименьшим элементом массива; расположить элементы в порядке возрастания. Оформить подпрограмму выполнения указанных действий над массивом A (N).

3. Преобразовать одномерный массив V в двумерный W размером 3х3: разрезать условно массив V на три полоски; поместить затем под первой полоской вторую, под второй - третью. Использовать при этом оформленную подпрограмму преобразования одномерного массива A(n) в двумерный массив B(m, m).

4. Составить массив R из произведений элементов каждого столбца матрицы W. Оформить подпрограмму выполнения над массивом B(m,m) указанных действий.

Дата добавления: 2015-07-11