Дается последовательность из N чисел. Выведите сумму четных чисел среди них. Формат входных данныхПервая строка входного файла содержит целое число N (1 <= N <= 1000 В следующей строке задаются N положительных целых чисел, каждая из которых меньше или равно 1000.Формат выходных данныхВыведите ответ к задаче.
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Эссе на тему моя работа это школьник
Автор: tip36
Посчитать значения выражения (a+b)*(c+d)
Автор: zdanovich90764
Ть рішити ребус т, , граблі‘, , ластівка
Автор: Курнев-Анастасия359
Що таке база даних будь ласка ітьф
Автор: filimon211
РЕШИТЕ , (Это вроде исполнитель черепашка
Автор: smint056950
Определите закономерность, укажите пропущенные числа. 4, 8, 5, 9, 6, ? 7, ? 8, 12
Автор: Dmitrievna-Dmitrii980
program z1;
var a,s,n,i:integer;
begin
s:=0;
readln(n);
for i:=1 to n do
begin
read(a);
if a mod 2 = 0 then s:=s+a
end;
writeln(s)
end.