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

Question

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

Напишите программку, которая в последовательности естественных чисел
определяет сумму всех чисел, кратных 4 и оканчивающихся на 8. Программа получает на вход естественные числа, количество введённых чисел неведомо, последовательность чисел кончается числом 0 (0 признак окончания ввода, не заходит в последовательность).
Количество чисел не превышает 100. Введённые числа не превышают 300. Программка обязана вывести одно число: сумму всех чисел, кратных 4 и заканчивающихся на 8.

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

Амина Щалыгина
Информатика
2019-08-24 17:26:58
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

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

Две трети пути это 28км. чему равен весь путь?

найти площадь 2/9 круга, радиус которого 8,1 см. (Число Пи округлить

допоможть правильно написати на англ.мов годину05:1004:3003:4003:15

В треугольнике ABC угол C=90 градусов, косинус A=0,8, BC=3. Найдите AB

Приведите дробь 3/4 к знаменателю 24

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

два проводника соединены параллельно. Напряжение на участке цепи 120 B.Противодействие первого

помогите написать сочинение о каком нибудь животном Рф по английски. Безотлагательно!!!

какими идеями желал поделиться мамин-сибиряк с чтецами

От полных причастий образуйте короткие формы дамского либо среднего рода единственного

Анатолий Склюдов · Answer 1 · 2019-08-24 17:36:31+3:00

Begin
var count := 0;
var sum := 0;
while True do
begin
var a := ReadInteger;
Assert(a lt;= 300);
count += 1;
Assert(count lt;= 100);
if a = 0 then
break;
if (a mod 4 = 0) and (a mod 10 = 8) then
sum += a;
end;
Writeln('Сумма чисел по предикату равна ', sum);
end.

О проекте

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

Добро пожаловать!