Создать одномерный числовой массив из 6 элементов и вывести результат на экран. Затем элементы, стоящие на нечетных местах уменьшить на 2, подсчитать сумму этих элементов и вывести эти значения на экран с пояснениями

Question

Информатика

Антоня

3 ноября, 22:05

Создать одномерный числовой массив из 6 элементов и вывести результат на экран. Затем элементы, стоящие на нечетных местах уменьшить на 2, подсчитать сумму этих элементов и вывести эти значения на экран с пояснениями

+4

Ответы (1)

Знаешь ответ?

Клариса · Answer 1

Program n1;

const n=6;

var a: array [1 ... n] of integer;

sum, i: integer;

begin

sum:=0;

for i:=1 to n do

begin

a[i]:=random (15) + 1;

write (a[i],' ');

if i mod 20 then sum:=sum+a[i];

end;

writeln;

writeln (sum/2);

end.