let () = Scanf.scanf "%d" @@ fun n ->
  let hh = Array.init n @@ fun _ -> Scanf.scanf " %d" Fun.id in
  let dp = Array.make n 0 in
  dp.(0) <- 0;
  for i = 1 to n - 1 do
    if hh.(i - 1) >= hh.(i) then dp.(i) <- dp.(i - 1) + 1 else dp.(i) <- 0
  done;
  Printf.printf "%d\n" @@ Array.fold_left max 0 dp