Заполнение массива

Заполнять массив, можно либо вводя значение каждого
элемента с клавиатуры, либо присваивая каждому элементу определённую величину.
При этом может использоваться цикл с параметром.
Например, для ввода с клавиатуры в значений элементов
описанного выше массива a используется следующий цикл спараметром:

   for i:=1 to 10 do read (a);

Задавать значения элементов массива можно с помощью оператора
присваивания. Например:

   for i:=1 to 10 do a:=i;

В следующем фрагменте программы организовано заполнение
целочисленного массива a, состоящего из 10 элементов, случайными числами,значение которых изменяется в диапазоне от 0 до 49:

   randomize;
   for i:=1 to 10 do a:=random(50);

Вывод массива

Элементы массива можно вывести в строку, разделив их пробелом:

   for i:=1 to 10 do write (a,’ ‘);

Для удобства можно ещё вывести информацию об элементе
массива:

   for i:=1 to 10 do writeln (‘a[‘,i,’]=’,a);

Пример программы:

   

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

Рассматривая код для вывода массива предоставленного
выше, попробуйте дополнить программу, чтобы вычислялась сумма элементов массива
и результат суммирования выводился на экран. Для этого используй этот фрагмент
кода:

   s:=0;
   for i:=1 to n do s:=s+a;