Задача 3. Введите с клавиатуры 5 положительных целых чисел. Вычислите сумму тех из них, которые делятся на 4 и при этом заканчиваются на 6. Программа должна вывести одно число: сумму чисел, выведенных с клавиатуры, кратных 4 и оканчивающихся на 6.

Question

Информатика

Моня

11 апреля, 05:28

Задача 3. Введите с клавиатуры 5 положительных целых чисел. Вычислите сумму тех из них, которые делятся на 4 и при этом заканчиваются на 6. Программа должна вывести одно число: сумму чисел, выведенных с клавиатуры, кратных 4 и оканчивающихся на 6.

+2

Ответы (1)

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

Владимир · Answer 1

Var

i, s, n, d: integer;

begin

n : = 5;

for i : = 1 to n do

begin

readln (d) ;

if (d mod 10 = 6) and (d mod 4 = 0) then

s : = s + d;

end;

writeln (s) ;

end.