Массивы. Одномерные массивы

имеется специальная структура, называемая массив.

Массив - это структура, представляющая собой

упорядоченную совокупность элементов одного типа, объединенных одним именем.
Массив в Паскале имеет фиксированное количество элементов.
Имя массива, количество элементов и тип элементов массива определяются пользователем при описании массива.

массив, состоящий из 88 элементов типа real,
в котором элементы

нумеруются от 11 до 99.

Индекс массива - это величина целого типа, характеризующая положение элемента в массиве.

Каждому массиву, используемому в программе, выделяется место в памяти.
Массиву отводится не одна ячейка, а последовательность расположенных друг за другом ячеек, в каждую из которых записывается значение соответствующего элемента.

array;
Диапазон изменения индексов, определяемый граничной парой, например: 1..40.

1..N. 5..20.
Нижняя граница показывает наименьшее возможное значение индекса, верхняя - наибольшее. Нижняя граница не может превосходить верхнюю.
Нижняя граница отделяется от верхней двумя точками;
4) Тип элементов массива.

пара] оf

(массив) (из)

Если несколько массивов имеют один и тот же тип, и одинаковый диапазон изменения индекса, то их описание можно объединить, разделив имена массивов запятыми:

Var
< имя 1, имя2....>: array [граничная пара] of <тип эл-тов>

Примеры:

Var
Vector: array [1 ..60] of integer;
xBlock: array [40..50] of real:
Xl,x2: array [0..60] of integer;

элемент можно обработать, указав имя массива и индекс элемента в

квадратных скобках.

Например, запись xBlock [42], Vektor[10] позволяет обратиться к элементу массива xBlock с индексом 42 и элементу массива Vektor с индексом 10.

клавиатуры;
случайным образом;
по формуле.

Надо помнить, что во всех трех случаях нам

не обойтись без организации цикла.
Будем считать, что объявили массив из 10 элементов (тип элементов в данном случае значения не имеет).

end;

Заполнение случайным образом.
Для этого мы должны подключить датчик случайных чисел.
FOR

i:=1 to 10 do
a[i]:=random(n); {n должно быть заранее задано}

3. Заполнение по формуле.
Каждый элемент массива должен быть рассчитан по формуле
(например, аi = sin i – cos i).
FOR i=1 to 10 do
a[i]:=sin(i)-cos(i);

a[i];

Вычисление среднего значения элементов массива

S:=0;
FOR i:=1 to 10 do
S :=

S + a[i];
SR:= S/10;

10,7,21,-12,0,4, 17.

Алгоритм поиска максимального (минимального) элемента мы построим так, чтобы

сравнивать пару чисел, повторяя действие сравнения нужное количество раз.
Введем дополнительную переменную с именем max.
Она и будет одним из чисел, второе число — это очередной элемент массива.
Для того, чтобы провести первую операцию сравнения необходимо переменной max присвоить некоторое начальное значение.
Здесь могут быть два варианта:
1) присвоить переменной max первый элемент массива, тогда количество повторений операции сравнения равно n -1;
2) присвоить число заведомо меньшее всех элементов массива. В этом случае, количество повторений операции сравнения n.

integer;
var
a: mas;
i: byte;
max: integer;
begin
{блок заполнения}
for i:=1 to

10 do
readln(a[i]);
{поиск максимального элемента}
max:=a[1];
for i:=2 to 10 do if a[i]>max then max:=a[i];
writeln('максимальный элемент=',тах)
end.