Лекция 7. Массивы
Массив – структура данных, которая представляет собой совокупность (набор) переменных одинакового типа.
Объявление массива
Имя: array[ВерхнийИндекс .. НижнийИндекс] as Тип;
Примеры объявления массивов:
a: array[1..20] of integer; { массив целых чисел }
b: array[1..5] of real; { массив дробных чисел }
Name:array[1..25] of string[20]; { массив строк }
КоличествоЭлементов = НижнийИндекс- ВерхнийИндекс+1
При объявлении массивов удобно использовать именованные константы
const
N =18;
var
team: array[1 .. N] of string[25];
Доступ к элементам массива
При обращении к элементу массива указывается номер (индекс) нужного элемента.
Массив[индекс] , где индекс - выражение целого типа.
a[1] := 5;
a[i] := 0;
team[1] := ”Зенит”
sum := sum + a[i];
Ввод массива
const
N=5;
var
a:array[1.. N] of integer;
i: integer;
begin
for i:=1 to N do
begin
write('a[,i,']>');
readln(a[i]);
end;
end;
Вывод массива
{ вывод элементов в одной строке}
const
N=5;
var
a:array[1 .. N] of integer;
i: integer;
begin
{ здесь инструкции ввода массива}
{ вывод массива }
for i:=1 to N-1 do
begin
write('a[,i,']>');
end;
writeln(a[N]);
end;
Обработка массива
Пример - вычисление среднего арифметического
const
N=5;
var
a:array[1.. N] of integer;
i: integer;
s: integer;
m: real;
begin
{ здесь ввод массива }
{ вычислить сумму элементов }
for i:=1 to N do
begin
s:=s+a[i];
end;
m:= s/N;
writeln('Сумма эл-тов массива: ', s);
writeln('Кол-во элементов:', N);
writeln('Среднее арифметическое: ', m:6:2);
end;
