#require 'pp'
require 'set'

n, k = gets.split.map(&:to_i)
a_n = gets.split.map(&:to_i)
ordered = SortedSet.new
a_n.each do |a|
    # now, orig, cnt
    ordered << [-a.to_f, -a.to_f, 1]
end

#pp ordered

k.times do |i|
    x, orig, cnt = ordered.first
    ordered.delete([x,orig,cnt])
    cnt += 1
    x2 = orig / cnt
    ordered << [x2, orig, cnt]

    #pp ordered
end

puts -ordered.first[0].floor
