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

Question

Информатика

Лаврентьич

29 января, 03:58

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

+5

Ответы (1)

Знаете ответ на вопрос?

Амалия · Answer 1

Program DZ; var s, i, n, x:longint; begin s:=0; read (n) ; for i:=1 to n do begin read (x) ; if (x mod 3=0) and (x mod 10=4) then s:=s+x; end; write (s) ; end.