Вопрос задан 18.07.2023 в 09:25. Предмет Информатика. Спрашивает Пистолетова Лиза.

Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных

3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 100. Введённые числа не превышают 300. Программа должна вывести одно число — сумму чисел, кратных 3
0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Уласик Андрей.

Ответ:

var n,i,a,s: integer;

begin

write('Введите количество чисел в последовательности: ');

readln(n);

for i := 1 to n do

begin

write('Введите число: ');

readln(a);

if a mod 3 = 0 then s:=s+a;

end;

writeln('Сумма чисел, кратных 3, равна: ',s)

end.

Объяснение:

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно! Вот пример программы на языке Python, который решает данную задачу:

python
n = int(input("Введите количество чисел в последовательности: ")) sequence = [] sum_multiples_of_3 = 0 print("Введите числа:") for _ in range(n): number = int(input()) sequence.append(number) for number in sequence: if number % 3 == 0: sum_multiples_of_3 += number print("Сумма чисел, кратных 3, равна:", sum_multiples_of_3)

Программа запрашивает у пользователя количество чисел в последовательности (n). Затем пользователю предлагается ввести числа по одному. В цикле происходит проверка каждого числа на кратность 3, и если число кратно 3, то оно добавляется к переменной sum_multiples_of_3. По завершении цикла выводится итоговая сумма чисел, кратных 3.

Обратите внимание, что данная программа не содержит проверок на соответствие условиям, так как они гарантированы по условию задачи.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос