var
    s : array [1..1000] of LongInt;
    allS, i, t : LongInt;
begin
    Readln(t);
    for i := 0 to t do begin
        Read(s[i]);
        allS := allS + s[i];
    end;
    Write(allS / t);
end.