
Напишите программу, которая в последовательности натуральных чисел определяет определяет сумму
всех чисел, кратных 16 и неоканчивающихся на 4Программа получает на вход натуральные числа, количество введённых чиселнеизвестно, последовательность чисел заканчивается числом 0

Ответы на вопрос

var
a,sum:integer;
begin
sum:=0;
readln(a);
if a=0 then
begin
writeln('Пустая последовательность');
exit;
end
else
repeat
if (a mod 16=0) and (a mod 10<>4)
then sum:=sum+a;
readln(a);
until a=0;
writeln('Sum: ',sum);
end.



num, sm = int(input()), 0
while num != 0:
if num % 16 == 0 and num % 10 != 4:
sm += num
num = int(input())
print(sm)



Конечно! Вот пример программы на языке Python, которая выполняет описанную задачу:
pythondef sum_multiples_of_16_not_ending_with_4():
number = int(input("Введите число: "))
total_sum = 0
while number != 0:
if number % 16 == 0 and number % 10 != 4:
total_sum += number
number = int(input("Введите число: "))
print("Сумма чисел, кратных 16 и не оканчивающихся на 4, равна:", total_sum)
sum_multiples_of_16_not_ending_with_4()
Программа будет запрашивать у пользователя числа до тех пор, пока не будет введен 0. Если число кратно 16 и не оканчивается на 4, оно будет добавлено к общей сумме total_sum
. В конце программа выведет результат — сумму всех чисел, удовлетворяющих условию.
Пожалуйста, обратите внимание, что эта программа предполагает, что пользователь будет вводить только натуральные числа. Если вам нужно добавить проверки на некорректный ввод или отрицательные числа, это можно сделать дополнительно.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili