#include <iostream>
#include<fstream>
using namespace std;
long long n,m,a,b,s[500006],k,sol,l;
int main()
{
  ifstream f("divk.in");
  ofstream g("divk.out");
  f>>n>>k>>a>>b;
    for(int i=1;i<=n;i++)
    {
        f>>s[i];
        s[i]+=s[i-1];
    }
      for(int i=a;i<=b;i++)
        for(int j=i;j<=n;j++)
        if((s[j]-s[j-i])%k==0)sol++;
    g<<sol;
    return 0;
}