#include <bits/stdc++.h>
using namespace std;
const int maxn = 500 + 10;
int d[2][maxn][maxn];
int a[maxn];
int main() {
  int n, m, b, mod;
  scanf("%d%d%d%d", &n, &m, &b, &mod);
  for (int i = 1; i <= n; i++) scanf("%d", &a[i]);
  int pre = 0, now = 1;
  d[0][0][0] = 1;
  for (int i = 1; i <= n; i++) {
    for (int j = 0; j <= m; j++)
      for (int k = 0; k <= b; k++) {
        d[now][j][k] = d[pre][j][k];
        if (j - 1 >= 0 && k - a[i] >= 0)
          d[now][j][k] += d[now][j - 1][k - a[i]];
        if (d[now][j][k] >= mod) d[now][j][k] %= mod;
      }
    swap(pre, now);
  }
  int ans = 0;
  for (int i = 0; i <= b; i++) ans = (ans + d[pre][m][i]) % mod;
  printf("%d\n", ans);
  return 0;
}
