Вычисление суммы элементов массива

Ключевые слова
- массив
- описание массива таблица
- заполнение массива
- вывод массива
- обработка массива

Заполнять массив можно либо вводя значение каждого элемента с клавиатуры, либо присваивая элементам некоторые значения. При заполнении массива и его выводе на экран используется цикл с параметром.
Решение разнообразных задач, связанных с обработкой массивов, базируется на таких типовых задачах, как:
- суммирование элементов массива;
- поиск элемента с заданными свойствами;
- сортировка массива.
Массив - это поименованная совокупность однотипных элементов, упорядоченных по индексам, определяющим положение элементов в массиве. В языках программирования массивы используются для реализации таких структур данных, как последовательности и таблицы.
Перед использованием в программе массив должен быть описан.
Общий вид описания одномерного массива:
var <имя_массива>: array [<мин_знач_индекса> …
<макс_знач_индекса>] of тип_элементов;

Ввод с клавиатуры
Массив - это поименованная совокупность однотипных элементов, упорядоченных по индексам, определяющим положение элементов в массиве.
var <имя_массива>: array [<мин_знач_индекса> .. <макс_знач_индекса>] of тип_элементов;
Присваивание значений
Заполнение массива
Суммирование элементов
Сортировка элементов массива
Поиск элемента во свойствам
Задачи по обработке массива

Вычисление суммы элементов массива
Суммирование элементов массива
осуществляется за счёт поочерёдного добавления слагаемых:
Определяется ячейка памяти (переменная s),
в которой будет последовательно накапливаться
результат суммирования
Присваивается переменной s начальное значение 0
- число, не влияющее на результат сложения
Для каждого элемента массива из переменной s
считывается её текущее значение и складывается
со значением элемента массива;
полученный результат присваивается переменной s.

Основной фрагмент программы:
s:=0;
for i:=1 to n do s:=s+a[i];
Вычисление суммы элементов массива

program n_2;
var s, i: integer;
a: array[1...10] of integer;
begin
s:=0;
for i:=1 to 10 do a[i]:=random(50);
for i:=1 to 10 do write (a[i],` `);
for i:=1 to 10 do s:=s+a[i];
writeln ('s=', s)
end.
Вычисление суммы элементов массива

Вопросы и задания
Запишите на языке Паскаль программу решения задачи, В некотором населённом пункте n домов. Известно, сколько людей проживает в каждом из домов. Запишите на языке Паскаль программу, которая подсчитывает количество жителей населённого пункта.
Считайте количество жильцов дома случайным числом из диапазона от 50 до 200 человек, а число домов n = 30.
Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры.
Определите, что будет напечатано в результате выполнения следующей программы:
program a7;
var i, s, sr: integer;
const a: array [1..6] of integer = (1, 7, 3, 6, 0, 10);
begin
s := 0:
for i :=1 to 6 do
s := s + a[i];
sr := s/6;
writeln (‘sr=‘ sr);
end.