      PROGRAM rollerCoaster
      IMPLICIT NONE
      INTEGER :: N, K
      INTEGER,ALLOCATABLE :: h(:)
      INTEGER :: ans
      
      INTEGER :: i
      
      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
      
      
      print'(I0)',ans
      
      
      
      
      
      
      END PROGRAM