N = gets.to_i
Hs = gets.split.map(&:to_i)

m = 0
c = 0
(N-1).times do |i|
    (N-i).times do |j|
        next if j == N-i-1
        
        if Hs[i + j] < Hs[i + j + 1]
            m = [m, c].max
            c = 0
        else
            c += 1
        end
    end
end

print m