let i_inp_list : unit -> int list = fun () ->
  let inp_split = Str.split (Str.regexp " ") (input_line stdin) in
  List.map (fun x -> int_of_string x) (inp_split)
  
let () =
  let (n, k) = Scanf.sscanf (input_line stdin) "%d %d" (fun a b -> (a, b)) in
  let l = i_inp_list () in
  let ans = List.fold_right (fun h num -> num + (if h >= k then 1 else 0)) l 0
  in
  print_int ans;
  print_newline ()
