Есть ответ 👍

Одномерные массивы. через паскаль abc. найти сумму элементов массива с четными номерами, содержащего 12 элементов. элементы вводятся случайным образом.

196
259
Посмотреть ответы 2

Ответы на вопрос:


Var sum,i: integer; a: array[1..12] of integer; begin writeln('исходный массив: '); sum: =0; for i: =1 to 12 do  begin a[i]: =random(20); write(a[i],' '); if i mod 2=0 then sum: =sum+a[i]; end; writeln; writeln('сумма: ',sum); end.

A1 = 5 a2 = a1 * 4 = 5 * 4 = 20 a3 = a2 + a1 = 20 + 5 = 25 b1 = a2 / 8 = 20 / 8 = 2.5 b2 = (b1 + a2) / 3 = (2.5 + 20) / 3 = 7.5

Популярно: Информатика