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

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.

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