program sample
    implicit none
  
    integer(8) :: i,j,m,n,x,b,d
    
    integer(8),allocatable :: a(:),y(:)
  
    read(*,*) n
    read(*,*) d,x
    allocate(a(n))
    read(*,*)a
    m=0
    do i=1,n
       m=m+(d-1)/a(i)+1
    end do

    
    write(*,*)m+x
    
    
    stop
end program sample
  

