Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 6. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 6. Количество чисел не превышает 100. Введенные числа не превышают 300. Программа должна вывести одно число — сумму чисел, кратных 6.
Пример работы программы:
| Входные данные | Выходные данные |
| 3 12 25 6 | 18 |
Запишем требуемое решение
var n, s, k, g: integer;
begin
s:=0;
readln(n);
for k:=1 to n do
begin
readln(g);
if (g mod 6 = 0) then
s:=s+g;
end;
writeln(s);
end.
Приведем решение Павла Шостка на языке Pascal.
readarrinteger(readinteger).Where(x->x.divs(6)).sum.Print;
Приведем решение на языке Python.
n = int(input())
sumi = 0
for i in range(n):
a = int(input())
if a % 6 == 0:
sumi += a
print(sumi)