C :

#include<stdio.h>
int main() {
    int N,sum,a;
scanf("%d",&N);
sum=0;
while(N--) {
    scanf("%d",&a);
    if(a%2==0)
        sum+=a;
}
printf("%d",sum);
return 0;

}

C++ :

#include<iostream>
using namespace std;

int main() {
	int n;
	cin >> n;
	int a[n];
	int sum = 0;
	for(int i=0; i<n; ++i) {
		cin >> a[i];
		if(a[i] % 2 == 0){
			sum += a[i];
		}
	}
	cout << sum << endl;
	return 0;
}

Pascal :

var
  n,m,i,s:longint;
begin
   read(n);
  for i:=1 to n do
  begin
  read(m);
  if m mod 2=0 then
s:=s+m;
end;
  writeln(s);
end.