Заполнение массива
с помощью команды «присвоить».
Этот способ применяется в том случае,
когда информация в таблице не меняется.
Часть программы, где организовывается заполнение массива оформляют с помощью подпрограмм.
В подпрограмме каждому элементу массива присваивается определенное значение.
TEMP: array [1..7] of integer;
SP: array [1..5] of string;
BEGIN
TEMP[1]:=10;
TEMP[2]:=12;
TEMP[3]:=8;
TEMP[4]:=10;
TEMP[5]:=9;
TEMP[6]:=8;
TEMP[7]:=8;
BEGIN
SP[1]:=‘Аксенов’;
SP[2]:=‘Бобров’;
SP[3]:=‘Веснин’;
SP[4]:=‘Гончаров’;
SP[5]:=‘Давыдов’;