Каталог статей

Массивы

Отличительная
особенность массивов заключается в том, что все их компоненты суть данные
одного типа (возможно, структурированного). Эти компоненты можно легко
упорядочить и обеспечить доступ к любому из них простым указанием его
порядкового номера, например:

type

  digit = array [0..9] of Char;

var

  d : digit;

  i : Integer;

begin

  d[1] := ‘A’;

  d[i] := ‘B’;

  d[i+1] := ‘C’;

end.

Описание типа массива задается следующим
образом:

имя
типа = array [диапазон индексов] of
тип компонент;

В качестве индексных
типов в Паскале можно использовать любые порядковые типы, кроме LONGINT u
типов-диапазонов с базовым типом LONGINT.

Определить переменную как массив
можно и непосредственно при описании этой переменной, без предварительного
описания типа массива, например:

var

  a,b :
array [1..10] of Real;

  m1 : array [-10..10] of LongInt;

  m2 : array [‘A’..’Z’] of Word;

В Паскале можно
одним оператором присваивания передать все элементы одного массива другому
массиву того же типа, например:

var

  a,b : array [1..5] of Single;

begin

  a := b;

end.

После этого
присваивания все пять элементов массива А получат те же значения, что и в
массиве В.

Однако над
массивами не определены операции отношения. Нельзя, например, записать

 if а = b then
...

Сравнить два
массива можно поэлементно, например:

var

  a,b : array [1..5] of Single;

  eq : Boolean;

  i   :
Byte;

begin

  eq := True;

  for i := 1 to 5 do

    if a[i] <> b[i] then eq := False;

  if eq then Write("Массивы одинаковы”);

end.