Предмет: Информатика, автор: koka13124

в массиве d1, d2,...d35 найти сумму чисел, расположенных на нечетных местах

Ответы

Автор ответа: MikhOm
0
var D: array [1..35] of integer;
     i, sum : integer;
BEGIN
for i:=1 to 35 do
read(D[i]);
sum:=0;
for i:=1 to 35 do
if i mod 2 <> 0 then sum:=sum+D[i];
writeln(sum);
END.
Интересные вопросы
Предмет: Окружающий мир, автор: kharitonovaale
Предмет: Алгебра, автор: ket3851
Предмет: Русский язык, автор: voloskodmitrij580