uses crt;
var i,n,s:integer;
a:array[1..1000] of integer;
const Fi='MANG.INP';
Fo='MANG.OUT';
begin
assign(input,Fi); reset(input);
assign(output,Fo); rewrite(output);
readln(n);
s:=0;
For i:=1 to n do
begin
read(a[i]);
if a[i] mod 2=0 then s:=s+a[i];
end;
writeln(s);
readln;
end.
Vote cho mik hay nhất nha :3