найти сумму элементов стоящих на четных местах и элементов стоящих на нечетных местах в массиве: 3,7,-2,11,6,-3,91,-74,10

Question

Информатика

Валентин

10 апреля, 10:33

найти сумму элементов стоящих на четных местах и элементов стоящих на нечетных местах в массиве: 3,7,-2,11,6,-3,91,-74,10

+4

Ответы (1)

Знаете ответ на вопрос?

Витоша · Answer 1

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

i, n, s1, s2:integer;

begin

readln (n) ;

for i:=1 to n do

readln (a[i]) ; s1:=0; s2:=0;

for i:=1 to n do

if i mod 2=0 then s1:=s1+a[i];

if i mod 2=1 then s2:=s2+a[i];

writeln (s1,' ', s2) ;

end.