program main
    integer:: n, k, i, ret
    integer, allocatable:: h(:)
    read*, n, k
    ret=0
    allocate(h(n))
    read*, h(1:n)
    do i = 1, n
        if (h(i) >= k) then
            ret=ret+1
        end if
    end do
    print*, ret

end program