Основы программирования на языке Turbo Pascal. Беляева И.В. - 17 стр.

UptoLike

Составители: 

17
Пользовательский типмассив
В программе можно определить тип массива, с тем, чтобы в
дальнейшем использовать его для определения переменных типа массива.
Пример:
Type
Arr = array[1..20] of integer; {Определили тип массива
целых чисел, содержащего 20 элементов}
Var
A, B : Arr; {A и B – массивы целых чисел, содержащие
по 20 элементов}
Дальше с массивами A и B можно работать, как с обычными массивами:
A[3] := 2;
B[4] := A[3];
и т.д.
Кроме типа массива в программе можно определить и специальный
тип для индексов. Этот тип должен быть интервальным.
Пример:
Type
IndexEl = 1 .. 20; {Тип индекса элемента}
Arr = array[IndexEl] of integer; {Тип массива целых чисел,
содержащего 20 элементов}
Var
A, B : Arr; {A и B – массивы целых чисел, содержащие
по 20 элементов}
i, j : IndexEl; {Переменные, используемые для указания
индекса элемента}