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

Question

Информатика

Наркис

21 июня, 01:33

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

+5

Ответы (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.