program main
    implicit none
    integer :: n, k, h(100000), i, c=0

    read(*,*)n,k
    read(*,*)(h(i), i = 1, n)
    do i = 1, n
      if (h(i) >= k) then
        c = c + 1
      end if
    end do
    
    write(*,*)c
end program main