      implicit none
      integer :: n,i
      real(16) :: a(1000),ans=0
      
      read*,n
      read*,a(1:n)
      
      do i = 1,n
        ans = ans + 1_16/a(i)
      end do
      
      print*,1_16/ans
      end