Дан массив L(12). Найти сумму элементов с четными индексами
Дан массив L(12). Найти сумму элементов с четными индексами
Гость
Ответ(ы) на вопрос:
Гостьprogram qq;
const N=12;
var L:array[1..N] of integer;
i, S:integer;
begin
for i:=1 to N do readln(L[i]);
S=0;
for i:=0 to N do
if (imod2=0) then S=S+A[i];
writeln(s);
end.
Не нашли ответ?
Похожие вопросы