Содержание
-
Массивы в Паскале
Учитель информатики и ИКТ ГБОУ СОШ № 394 Санкт-Петербурга Дунаева Ирина Анатольевна
-
При написании программ достаточно частая задача – хранить значительное количество однотипных данных. Для того, чтобы можно было не только хранить, но и удобно обрабатывать однотипную информацию, придумали массивы.
-
Массив–
совокупность однотипных данных, расположенных подряд и имеющих общее имя. При этом каждый элемент массива имеет собственный номер, называемый индексом элемента массива, а то, что хранится в этом элементе, - значением элемента массива.
-
Описание массива
Любые переменные, включая массивы, должны быть описаны в разделе описания переменных var. При описании массива следует указывать: Имя новой переменной (массива) Диапазон значений индексов элемента массива и тип данных, который хранится в элементах массива Пример Var A : array [1...10] of integer;
-
Задание начальных значений элементов массива
Перед тем, как массив можно будет использовать/обрабатывать, элементы массива должны получить значения. Эти значения могут быть присвоены оператором присваивания или введены с клавиатуры.
-
Обнуление всех элементов массива
Если способ задания значения для каждого элемента одинаковый, почти всегда можно использовать цикл for, перебирающий индексы элементов массива от первого до последнего. Перебираем все элементы массива и в каждый кладем ноль: For i := 1 to 10 do A[i] := 0;
-
Задание элементов массива определенной последовательностью
Заполним элементы массива последовательностью степеней числа 10 от нулевой до 9-й. Используем для этого вспомогательную переменную, в которой будем последовательно получать значение очередного элемента: B := 1; for i:= 1 to 10 do begin a[i]:= b*10 end;
-
Другой способ – использовать для вычисления очередного элемента значение предыдущего элемента массива: A[1] := 1; for I := 2 to 10 do A[i] := A[i-1]*10;
-
Вывод массива на экран
Под термином «вывод массива на экран» понимается вывод на экран всех элементов массива. В Паскале нельзя написать «writeln (A)», чтобы все значения вывелись на экран. Требуется перебрать по очереди индексы всех элементов вывести каждый на экран: for I :=1 to 10 do write (A[i] , ‘ ’); writeln;
-
Подсчет количества элементов массива
Посчитаем количество нечетных элементов массива. Для этого заведем переменную-счетчик. Перед циклом обнулим эту переменную. В цикле будем перебирать по очереди все элементы массива и проверять текущий элемент массива на нечетность: k:= 0; For I :=1 to 10 do if A[i] mod 2 0 then k:= k + 1; writeln (k);
-
Вычисление суммы положительных элементов массива
Создадим переменную для подсчета суммы нужных элементов . Перед циклом ей присвоим значение – ноль. В цикле переберем по очереди все элементы массива и проверим их на положительность. Если условие выполняется, добавляем значение проверенного элемента к сумме: sum := 0; For i:=1 to 10 do if A[i] > 0 then sum := sum + A[i]; writeln (sum);
Нет комментариев для данной презентации
Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.