program main 
 implicit none
 integer N,K,ans,i
 integer,allocatable::h(:)
 
 read(*,*) N,K
 allocate(h(N))
 read(*,*) h
 
 ans = 0
 do i=1,N
  if(h(i) >= K) then
   ans = ans+1
  end if
 end do
 
 write(*,*) ans
end program main