var a:array[1..100]of integer;
    i,n,min:integer;
begin
          repeat readln(n); until (n>0) and (n<101);
          for i:=1 to n do begin
                           readln(a[i]);
                           min:=a[1];
                           if (a[i] mod 2 = 0) and (a[i]<min) then min:=a[i];
                           end;
          if min mod 2 = 0 then writeln('Najmanji parni element je ',min)
                           else writeln('Nema parnih elemenata');
          readln;
end.