local n, m = io.read("*n", "*n")
local x, y = io.read("*n", "*n")
local t = {}
local ret = 0
for i = 1, n do
  local a = io.read("*n")
  if y < a then
    if x <= a then
      ret = ret + a
      m = m - 1
    else
      table.insert(t, a)
    end
  end
end
table.sort(t, function(a, b) return a > b end)
if m < 0 then
  print("Handicapped")
else
  local lim = math.min(m, #t)
  for i = 1, lim do
    ret = ret + t[i]
  end
  print(ret)
end