Составить программу для нахождения суммы чисел, кратных 4, из последовательности вводимых чисел. Сначала вводится количество чисел в последовательности, а затем сами числа.
pinguinbird:
на каком языке
Ответы на вопрос
Ответил vintt
3
Ответ:
Объяснение:
В задаче не было языка, написал на паскале.
Захочешь перепишешь на другие)
var n,x,sum:integer;
begin
sum:=0;
writeln ('Введите количество чисел в последовательности');
readln (n);
for var i:=1 to N do begin
readln (x);
if x mod 4=0 then
sum:=sum+x;
end;
writeln ('Сумма чисел кратных 4: ',sum);
end.
Новые вопросы
История,
2 года назад
Английский язык,
2 года назад