Напишите программу, которая в
последовательности натуральных чисел
определяет сумму всех чисел, кратных 6 и
оканчивающихся на 4. Программа получает на
вход натуральные числа, количество
введённых чисел неизвестно,
последовательность чисел заканчивается
числом 0 (0 — признак окончания ввода, не
входит в последовательность). Количество
чисел не превышает 1000. Введённые числа не
превышают 30 000. Программа должна
вывести одно число: сумму всех чисел,
кратных 6 и оканчивающихся на 4.
Пример работы программы:
Входные данные Выходные данные
24
6
34
22
84
0
108
220
265
Ответы на вопрос:
s = 0
i = 1
while i != 0:
i = int(input())
if i % 10 == 4 and i % 6 == 0:
s += i
print(s)
// PascalABC.NET
begin
ReadSeqIntegerWhile(p -> p <> 0)
.Where(p -> (p mod 6 = 0) and (p mod 10 = 4))
.Sum
end.
Популярно: Информатика
-
EvaVergun17.03.2021 17:17
-
varabunia1207.06.2023 18:19
-
пмпсасрчвчврсв19.11.2020 20:47
-
ksenia756701206.05.2022 20:11
-
AlexSubbotin1130.04.2020 13:44
-
Katyastudio11.07.2021 21:18
-
yra837200410.05.2023 20:50
-
j502277815.03.2020 00:14
-
Akbota050411.01.2023 01:57
-
Eduardo019283746502.03.2022 07:14