Numb=1..10; Var

N: numb;

alfa: ‘a’..’z’; begin

end.

3.2Составные типы данных

3.2.1Регулярные типы данных (массивы)

Array

Бывают задачи, в которых нельзя обойтись некоторым достаточно небольшим набором переменных, а если выразиться точнее, то редко бывают такие задачи, в которых не требуется обработка больших наборов данных. Для этого в первую очередь используются массивы.

Массивы представляют собой ограниченную упорядоченную совокупность однотипных величин. Каждая отдельная величина называется компонентой массива. Тип компонент может быть любым, принятым в языке Pascal (и составным в том числе) кроме файлового типа. Тип компонент называется базовым типом. Проще говоря, массив – ряд переменных одного типа. Для всех компонент в массиве существует одно имя, а для доступа к отдельным из них используется индекс.

Для того чтобы объявить массив в паскале и и с-

пользуется следующая конструкция:

Array[индекс1, индекс2, ..]of Базовый тип.

[индекс1, индекс2, ..] по сути определяет размер массива (количество его элементов). индекс1, индекс2, .. – Интервалы, указанные перечисляемым типом, базовым для которого могут являться Булевский, Символьный и Целочисленный типы.

45

В зависимости от количества индексов массивы бывают одномерные (Вектора), двухмерные (матрицы), трехмерные и т.д.

Объявить массив можно как предварительным описанием нового типа в разделе type, так и в разделе описания переменных (var).

Например:

Program Arrays; Type

TcMass=array[‘a’.. ‘z’] of char; TMass=array[false.. true]of

Array[false.. true]of in-

teger; Var

acB, acC: TcMass; aaiM: Tmass;

arV: arra[1..10, 1..10, 1..10]of

real;

Begin

arV[1, 1, 1]:=0.6;

End.

При обращение к несуществующей ячейке массива программа выдаст ошибку.

В операторной части программы один массив может быть присвоен другому, если их типы идентичны, например для предыдущей программы можно использовать:

acB:=acC;.

46

Чтобы создать массив, и прописать в него начальные значения всех его элементов испоьзуется следующая

конструкция:

Type

Dim10 = Array[1..10] of Real;

const

raM10: Dim10 = ( 0, 2.1, 4, 5.65, 6.1, 6.7, 7.2, 8, 8.7, 9.3 );

Для двумерных массивов значения компонент каждого из входящих в него одномерных массивов записывается в скобках:

Type

Dim3x2= Array[1..3,1..2] of Inte-

ger;

const

iaM3x2: Dim3x2= ( (1, 2) (3, 4) (5, 6) );

Отметим, что в вышеприведенных случаях, если не указывать имя типа, то мы будем иметь константный массив.

Pascal допускает два типа составных структур, в частности - массивов: упакованные и распакованные. Упакованные позволяют экономить оперативную память, однако в значительной степени снижают быстродействие программы. Для объявления упакованного используется служебное слово packed:

arMase: packed array [1..150] of re-

al;

47

Все вышеприведённые массивы относятся к типу распакованных, которые применяются в подавляющем большинстве случаев.

Массивы занимают в памяти весьма значительные объёмы, поэтому целесообразно освоить некоторые приёмы работы с памятью.

Функция SizeOf(V): word;

Эта функция возвращает размер памяти, выделенной под переменную V. Например, если V: array[1..10] of real, то функция вернёт значение 40 (10 элементов, объёмом 4 байта каждый).

Процедура FillChar( var V; NBytes: Word; B: Byte );

Эта процедура заполняет все байты участка памяти, начиная с адреса переменной V, количеством NBytes, значением переменной B.

Например, для обнуления массива A: array[1..10] of Real можно записать:

FillChar(A, 40, 0);

или

FillChar(A, SizeOf(A), 0);

Процедура Move(const Source; var Dest; Count: Integer);

Эта процедура копирует Count байт начиная с адреса переменной Source в область памяти, начиная с адреса переменной Dest. Это, например, можно использовать, когда требуется приравнять друг к другу массивов разных типов.

Оператор @ - взятие адреса (имеет приоритет равный приоритету not при составлении выражений).

48