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

Question

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

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

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

Рогусский Евген
Информатика
2019-08-07 06:47:06
0
1

1 ответ

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

Имя:*

E-Mail:

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

определение систематическое положение шимпанзе (вид, род, семейство, отряд, класс, тип,

одна бригада лесорубов может вырубить лесной участок да 9 дней,а другая

пожалуйста помогите составить диалог маан найты жанр (жанр который мне нравится)

что здесь можно поправить либо убрать the cats name is mussy

Розв039;яжть рвняння: 2x в кватрате +13х+6=0

62м82дм-7дм53см-18м94дм помогите решить в столбик

свои запасы инки берегли

В прямоугольном треугольнике найдите гипотенузу с, если его катеты равны: а=5

Составьте текст из 5 трудных предложений(ССП) (СПП) на тему Весной в

Помогите пожалуйста)))

Володя Балаченков · Answer 1 · 2019-08-07 06:49:40+3:00

Var
    i, s, n, d: integer;

begin
    readln(n);
    for i := 1 to n do
    begin
        readln(d);
        if (d mod 10 = 8) and (d mod 3 = 0) then
            s := s + d;
    end;
    writeln(s);
end.

О проекте

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

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