#include <iostream>
#include <fstream>
using namespace std;
int K, A, B, N, T=0;
long long v[500001], s[500001];
ifstream f ("divk.in");
ofstream g ("divk.out");
void cit (int N, long long v[500001])
{
    int i;
    for (i=1; i<=N; i++)
    f>>v[i];
}
void summ (int N, long long v[500001], long long s[500001])
{
    int i;
    s[1]=v[1];
    for (i=2; i<=N; i++)
    {
        s[i]=s[i-1]+v[i];
    }
}
void progg (int N, long long v[500001], long long s[500001])
{
    int i,j;
    for (i=1; i<=N; i++)
    for (j=i; j<=N; j++)
    {
        if (j-i+1>=A&&j-i+1<=B&&(s[j]-s[i-1])%K==0)
        {
            T++;
        }

    }
    g << T;

}
int main ()
{
    f>>N>>K>>A>>B;
   cit(N,v);
   summ(N,v,s);
   progg (N,v,s);

}