Найти сумму элементов в одномерном массиве, оканчивающихся на 3 и стоящих на четных местах
Найти сумму элементов в одномерном массиве, оканчивающихся на 3 и стоящих на четных местах
Гость
Ответ(ы) на вопрос:
Гостьvar
n,sum,i,b:integer;
begin
read(n);
sum:=0;
for i:=1 to n do
begin
read(b);
if(i mod 2=0)and(b mod 10=3)then sum:=sum+b;
end;
write(sum);
end.
Не нашли ответ?
Похожие вопросы