Массивы в Паскале. Описание массива

1.

Массивы в Паскале
Учитель информатики и ИКТ
ГБОУ СОШ № 394 Санкт-Петербурга
Дунаева Ирина Анатольевна

2.

При написании программ достаточно частая задача –
хранить значительное количество однотипных
данных.
Для того, чтобы можно было не только хранить, но и
удобно обрабатывать однотипную информацию,
придумали массивы.

3.

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

4.

Описание массива
Любые переменные, включая массивы, должны быть
описаны в разделе описания переменных var.
При описании массива следует указывать:
Имя новой переменной (массива)
Диапазон значений индексов элемента массива и тип
данных, который хранится в элементах массива
Пример
Var A : array [1...10] of integer;

5.

Задание начальных значений элементов
массива
Перед тем, как массив можно будет
использовать/обрабатывать, элементы массива
должны получить значения.
Эти значения могут быть присвоены оператором
присваивания или введены с клавиатуры.

6.

Обнуление всех элементов массива
Если способ задания значения для каждого элемента
одинаковый, почти всегда можно использовать цикл
for, перебирающий индексы элементов массива от
первого до последнего.
Перебираем все элементы массива и в каждый
кладем ноль:
For i := 1 to 10 do
A[i] := 0;

7.

Задание элементов массива определенной
последовательностью
Заполним элементы массива последовательностью
степеней числа 10 от нулевой до 9-й.
Используем для этого вспомогательную переменную,
в которой будем последовательно получать значение
очередного элемента:
B := 1;
for i:= 1 to 10 do
begin
a[i]:= b*10
end;

8.

Другой способ – использовать для вычисления
очередного элемента значение предыдущего
элемента массива:
A[1] := 1;
for I := 2 to 10 do
A[i] := A[i-1]*10;

9.

Вывод массива на экран
Под термином «вывод массива на экран» понимается
вывод на экран всех элементов массива.
В Паскале нельзя написать «writeln (A)», чтобы все
значения вывелись на экран.
Требуется перебрать по очереди индексы всех
элементов вывести каждый на экран:
for I :=1 to 10 do
write (A[i] , ‘ ’);
writeln;

10.

Подсчет количества элементов массива
Посчитаем количество нечетных элементов массива.
Для этого заведем переменную-счетчик. Перед
циклом обнулим эту переменную. В цикле будем
перебирать по очереди все элементы массива и
проверять текущий элемент массива на нечетность:
k:= 0;
For I :=1 to 10 do
if A[i] mod 2 <> 0 then
k:= k + 1;
writeln (k);

11.

Вычисление суммы положительных
элементов массива
Создадим переменную для подсчета суммы нужных
элементов . Перед циклом ей присвоим значение –
ноль. В цикле переберем по очереди все элементы
массива и проверим их на положительность. Если
условие выполняется, добавляем значение
проверенного элемента к сумме:
sum := 0;
For i:=1 to 10 do
if A[i] > 0 then
sum := sum + A[i];
writeln (sum);