напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, оканчивающееся на 4. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число - сумму чисел, оканчивающихся на 4.
More Questions From This User See All
Answers & Comments
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.