#include <bits/stdc++.h>
#define BIT(n) (1LL << (n))
#define BITF(n, i) (((n) >> i) & 1)
#define REP(i, n) for (int i = 0; i < n; i++)
#define FOR(i, m, n) for (int i = m; i < n; i++)
#define REPI(i, x) for (int i = 1; i <= x; i++)
#define FORI(i, m, n) for (int i = m; i <= n; i++)
#define REPR(i, n) for (int i = n; i >= 0; i--)
#define REPZ(i, x) for (int i = 0; i <= x; i++)
#define FORA(i, n) for (auto &&i : n)
using namespace std;
#define DUMPOUT cerr
// vector
template <typename T> istream &operator>>(istream &is, vector<T> &vec) {
  for (T &x : vec) is >> x;
  return is;
}
// pair
template <typename T, typename U> ostream &operator<<(ostream &os, pair<T, U> &pair_var) {
  os << "(" << pair_var.first << ", " << pair_var.second << ")";
  return os;
}
// vector
template <typename T> ostream &operator<<(ostream &os, const vector<T> &vec) {
  os << "{";
  REP(i, (int)vec.size())
  os << vec[i] << (i + 1 == (int)vec.size() ? "" : ", ");
  os << "}";
  return os;
}
// map
template <typename T, typename U> ostream &operator<<(ostream &os, map<T, U> &map_var) {
  os << "{";
  FORA(itr, map_var) {
    os << *itr;
    itr++;
    if (itr != map_var.end()) os << ", ";
    itr--;
  }
  os << "}";
  return os;
}
// set
template <typename T> ostream &operator<<(ostream &os, set<T> &set_var) {
  os << "{";
  FORA(itr, set_var) {
    os << *itr;
    itr++;
    if (itr != set_var.end()) os << ", ";
    itr--;
  }
  os << "}";
  return os;
}
void dump_func() { DUMPOUT << endl; }
template <class Head, class... Tail> void dump_func(Head &&head, Tail &&... tail) {
  DUMPOUT << head;
  if (sizeof...(Tail) > 0) DUMPOUT << ", ";
  dump_func(std::move(tail)...);
}
#ifdef DEBUG_
#define DEB
#define DUMP(...)                                                             \
  DUMPOUT << "  " << string(#__VA_ARGS__) << ": "                             \
          << "[" << to_string(__LINE__) << ":" << __FUNCTION__ << "]" << endl \
          << "    ",                                                          \
      dump_func(__VA_ARGS__)
#define PRINTARR(x, y)                                     \
  cerr << #x << "=\n";                                     \
  for (auto itr = x; itr != y; itr++) cerr << *itr << " "; \
  cerr << endl;
#define PRINTARR2(x, i0, i1)                                       \
  cerr << #x << "=\n";                                             \
  for (int ii0 = 0; ii0 < i0; ii0++) {                             \
    for (int ii1 = 0; ii1 < i1; ii1++) cerr << x[ii0][ii1] << " "; \
    cerr << endl;                                                  \
  }
#else
#define DEB if (false)
#define DUMP(...)
#define PRINTARR(x, y)
#define PRINTARR2(x, i0, i1)
#endif
#define ALL(v) v.begin(), v.end()
#define fst first
#define snd second
#define mp make_pair
#define pb push_back
#define epb emplace_back
#define int long long
#define pint pair<int, int>
#define ld long double
using namespace std;
template <class T> bool chmax(T &a, const T &b) {
  if (a < b) {
    a = b;
    return 1;
  }
  return 0;
}
template <class T> bool chmin(T &a, const T &b) {
  if (a > b) {
    a = b;
    return 1;
  }
  return 0;
}
template <class T> using vec = std::vector<T>;
template <class T> void print(const T &x) { cout << x << "\n"; }
const int MOD = 1000000007, INF0 = 1061109567, INF = INF0 * INF0;
const double EPS = 1e-10, PI = acos(-1.0);
const int dx[4] = {1, 0, -1, 0}, dy[4] = {0, 1, 0, -1};
/*
[&] { return; }();下のスラッシュを2つ追加しただけ.上のスラッシュを2つにすれば外れる.
//*/
#define MAXN 100100
int N, M, V, P;
int a[MAXN];
int aC[MAXN];
bool isOK(int id) {
  if (id == -1) return false;
  if (id == N) return true;
  //
  memcpy(aC, a, sizeof(int) * N);
  // auto itr = upper_bound(a, a + N, a[id] + M);
  //  int pos = distance(a, itr);
  int cnt = M * (V - 1);
  aC[id] += M;
  int i = 0;
  while (1) {
    DUMP(i, cnt);
    DUMP(i, a[i], aC[i], a[id], M);
    if (cnt == 0) break;
    if (i == id) {
      i++;
      continue;
    }
    if (i == N || a[i] >= a[id] + M) break;
    int val = min(M, min(a[id] + M - a[i], cnt));
    aC[i] += val;
    cnt -= val;
    i++;
  }
  REPR(i, N - 1) {
    if (cnt == 0) break;
    int val = min(M - (aC[i] - a[i]), cnt);
    aC[i] += val;
    cnt -= val;
  }
  DUMP(id);
  PRINTARR(a, a + N);
  PRINTARR(aC, aC + N);
  assert(cnt == 0);
  // assert(accumulate(a, a + N, 0) + M * V == accumulate(aC, aC + N, 0));
  //  REP(i, V) aC[(id - i + N) % N] += M;
  int val = aC[id];
  sort(aC, aC + N);
  auto itr = upper_bound(aC, aC + N, val);  //奥
  int pos = N - distance(aC, itr);          //より大きい要素数
  PRINTARR(a, a + N);
  DUMP(id, pos < P);
  PRINTARR(aC, aC + N);
  return pos < P;
}
signed main() {
  cin.tie(0), ios::sync_with_stdio(false);
  cout << fixed << setprecision(12);
  cin >> N >> M >> V >> P;
  REP(i, N) cin >> a[i];
  sort(a, a + N);

  //初期値は異なる。
  int left = -1;
  int right = N;
  DUMP(isOK(N - 1));
  DUMP(isOK(0));
  while (right - left > 1) {
    int mid = (left + right) / 2;
    // left trueの場合
    if (isOK(mid))
      right = mid;
    else
      left = mid;
  }
  print(N - right);
}

Measured memory_bytes: 1792