Вычислить сумму элементов массива - Pascal (248576)

Формулировка задачи:

а) Вычислить сумму элементов массива B₁, B₂, ..., B₁₅, значения которых больше 2 и меньше 10. б) Найти произведение элементов массива B₁, B₂, ..., B₁₅, стоящих на четных местах.

Решение задачи: «Вычислить сумму элементов массива»

Листинг программы

a[i] := random(11) - 5;

Объяснение кода листинга программы

В данном коде выполняется следующее:

Переменная i инициализируется значением 0.
В цикле выполняется следующее: a. Значение переменной i увеличивается на 1. b. Значение переменной a[i] присваивается результат работы функции random(11), отнятый от 5.
Цикл выполняется до тех пор, пока значение переменной i не станет больше 9.
Значение переменной sum присваивается нулю.
В цикле выполняется следующее: a. Значение переменной i увеличивается на 1. b. Значение переменной sum увеличивается на значение переменной a[i].
Цикл выполняется до тех пор, пока значение переменной i не станет больше 9.
Значение переменной sum выводится на экран.