program Noname11;
var
duom, rez : text;
kiek, i, j, kiekvid : integer;
L, ats, R : real;
 
 
begin
        L:= 0;
        ats:= 0;
            Assign(duom,'Duom1.txt');
            Assign(rez,'Rez1.txt');
        Reset(duom);
        Reset(rez);
    Readln(duom, kiek);
for i:= 1 to kiek do
    Read(duom, kiekvid);
            begin
for j:= 1 to kiekvid do
            begin
    Read(duom, R);
            L:= L + 1/R;
            end;
            ats:= ats + 1/L;
 
 
            end;
            Write(ats:2:2);
 
 
 
                        Close(duom);
                        Close(rez);
  Readln;
end.