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

Question

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

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

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

Программа должна вывести одно число: сумму чисел, кратных 3 и заканчивающихся на 8.

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

Леонид Гамидер
Информатика
2019-08-07 06:06:58
0
1

1 ответ

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

Имя:*

E-Mail:

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

0,75:x=6/5:4/3решить уравнение

в словах цветок,платьице,злостью, ночкой, махоньких,денек, пьёт, соловью, свиньею, фонарь,

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

кто что сумеет) геометрия

Сочинение на тему даруете удовлетворенность людям!

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

С1, С3, С4 ПОЖААЛУЙСТА

5(y-1)-3(y-2)=7-y+3

какой объем этилена (н.у.) нужен для получения 30 г. мэтилового эфира

Что оказывало влияние на развитие киевского княжества в 12-13 веках

Борис Чененко · Answer 1 · 2019-08-07 06:16:57+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.

О проекте

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

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