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

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

  • автор:

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

Программа получает
на вход натуральные числа, количество введённых чисел неизвестно,
последовательность чисел заканчивается числом 0 (0 – признак окончания
ввода, не входит в последовательность).
Количество чисел не превышает 20. Введённые числа не превышают 1500.
Программа должна вывести одно число: сумму всех двузначных чисел,
кратных 8.

Голосование за лучший ответ

array=[]
for i in range(20):
~~a=int(input(‘Число? ‘))
~~if a==0 or a>1500: break
~~if 9print (sum([i for i in array if i%8==0]))

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

Напишите программу. сумму чисел, кратных 6.

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

Количество введенных чисел не превышает 100. Все числа не превышают 300.

Программа должна вывести одно число: сумму чисел, кратных 6.

Пример работы программы:

Входные данные: 3, 12, 25, 6.

Выходные данные: 18.

Решение:

Код программы на Паскале:

 Program nomer_2; Var a, i, n, S: integer; Begin Write('Vvedite n '); readln(n); S:=0; For i:=1 to n do begin read(a); if (a mod 6 =0) then S:=S+a; end; Writeln(S); End. 

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

Скачай курс
в приложении

Перейти в приложение
Открыть мобильную версию сайта

© 2013 — 2023. Stepik

Наши условия использования и конфиденциальности

Get it on Google Play

Public user contributions licensed under cc-wiki license with attribution required

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

УПС, страница пропала с радаров.

*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением

Вам может понравиться Все решебники

Enjoy English

Биболетова, Денисенко

Мерзляк, Номировский, Полонский

Дорофеев, Суворова, Бунимович

Андреев, Фёдоров

Пономарева

Пономарева, Корнилова

Быстрова, Кибирева, Гостева

©Reshak.ru — сборник решебников для учеников старших и средних классов. Здесь можно найти решебники, ГДЗ, переводы текстов по школьной программе. Практически весь материал, собранный на сайте — авторский с подробными пояснениями профильными специалистами. Вы сможете скачать гдз, решебники, улучшить школьные оценки, повысить знания, получить намного больше свободного времени.

Главная задача сайта: помогать школьникам и родителям в решении домашнего задания. Кроме того, весь материал совершенствуется, добавляются новые сборники решений.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *