Program Primer;
var a, s: integer;
begin
s:= 0;
readln\(a\);
while a<>0 do begin
if \(a mod 4 = 0\) and \(a mod 10 = 4\) then
s := s + a;
readln\(a\);
end;
writeln\(s\);
end.
Какое число получится, если ввести ряд чисел 80, 12, 164, 104, 11, 0?