Создаём многомерный массив в Delphi из шести столбцов и четырех строк.
(см. рисунок ниже):
Чтобы реализовать такую фишку при помощи одномерных массивов, нужно будет объявить четыре разных массива, по шесть элементов. Например:
|
1 2 3 4 5 |
var a: Array [0..5] of Integer; b: Array [0..5] of Integer; c: Array [0..5] of Integer; d: Array [0..5] of Integer; |
а затем присвоить элементам соответствующие значения, что в общем то не совсем удобно да и легко запутаться.
|
1 2 3 4 5 6 7 |
Begin a[0]:=56; a[2]:=1; b[0]:=15; b[1]:=8; c[1]:=11; end; |
И вот как раз в таких ситуациях, нас могут здорово выручить, многомерные массивы. Объявляются они практически так же, как и одномерные, только в квадратных скобках, указываются размеры строк и столбцов, данных. Так, рассматриваемая нами таблица, может быть организована в виде двумерного массива следующим образом:
|
1 2 3 4 5 6 7 8 9 10 |
var // 0..3 - объявление строк, а 0..5 - объявление столбцов a: Array [0..3, 0..5] of Integer; begin a[0],[0]:=56; a[1],[0]:=15; a[1],[1]:=8; a[2],[1]:=11; a[0],[2]:=1; end; |
Не правда ли компактней? Да и к данным удобней обращаться. Если попробовать наш двумерный массив представить графически, то получим примерно следующее (см. рисунок ниже):
Можно например также создавать трех, четырех и более мерные массивы. Например объявление трехмерного, массива будет выглядеть следующим образом:
|
1 |
a: array[0..3, 0..5, 0..4] of Real; |