输入n个整数，求这n 个数之中的偶数平均值，并输出
输入n个整数，求这n 个数之中的偶数平均值，并输出
日期：2008-05-13 20:47:58 人气：1
program xxx(input,output);
var
a,b,n:integer;
m:longint;
c:real;
begin
read(n);
for i:=1 to n do begin
read(a);
if (a mod 2=0) then begin
m:=m+a;
b:=b+1;
end;
end;
c:=m/b;
write('pingjunzh