Довольно часто приходится иметь дело с информацией, которая представлена в табличной форме. Колонки и (или) строки таблицы, как правило, состоят из однородной информации. Поэтому в программе, обрабатывающей табличные данные, имеет смысл использовать массивы для хранения и обработки таблиц.
Например, таблица из пяти строк и двенадцати колонок может быть представлена как совокупность одномерных массивов:
Stroka1: array [1..12] ofinteger;
Stroka2: array [1..12] ofinteger;
Stroka3: array [1..12] ofinteger;
Stroka4: array [1..12] ofinteger;
Stroka5: array [1..12] of integer;
Возможно представление такой таблицы и по колонкам. В этом случае таблица может быть представлена двенадцатью массивами по 5 элементов:
Kolonka1: array[1..5] ofinteger;
Kolonka2: array[1..5] ofinteger;
Kolonka3: array[1..5] ofinteger;
...
Kolonka10: array[1..5] ofinteger;
Kolonka11: array[1..5] ofinteger;
Kolonka12: array[1..5] ofinteger;
Если вся таблица содержит однородную информацию, например, только целые числа, то такая таблица может быть представлена как двумерный массив.
В общем виде инструкция объявления двумерного массива выглядит так:
Таким образом, массив OurTab состоит из 60 элементов типа integer.
Для того чтобы использовать элемент массива, нужно указать имя массива и индексы элемента. Например, OurTab[2,3] или OurTab[2][3].
Пример вычисления суммы элементов массива:
Var
a : array [1..5, 1..12]ofinteger;
i,j,s:integer;
Begin
{блок наполнения массива значениями опущен}
s:=0;
for i:=1 to 5 do
for j:=1 to 12 do
s:=s+a[i,j];
writeln(s);
readln; {ожидание нажатия клавиши <Enter>}
End.
Рассматриваемая нами таблица также может быть описана как одномерный массив одномерных массивов:
OurTab: array[1..5] of array [1..12] ofinteger;
В этом случае обращение к элементам массива осуществляется также. Например, OurTab[2,3] или OurTab[2][3].
Вообще, многомерный массив задается с необходимым числом измерений и с нужным количеством элементом по каждому измерению. Число измерений неограничено. В общем случае задание многомерного массива выглядит следующим образом: