Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 4. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, оканчивающееся на 4. количество чисел не превышает 1000.
введённые числа не превышают 30 000. программа должна вывести одно число - сумму чисел, оканчивающихся на 4.
var n, a, s : integer;
begin
write('количество чисел: ');
readln(n);
write('ввести числа: ');
for var i := 1 to n do begin
read(a);
if a mod 10 = 4 then s+= a
end;
writeln;
writeln(s);
end.