#include <cstdio>
using namespace std;
FILE*f=fopen("divk.in","r");
FILE*g=fopen("divk.out","w");
int i,j,n,k,a,b,x,S[500005];
long long nrsol;
int main()
{
    fscanf(f,"%d %d %d %d",&n,&k,&a,&b);
    for (i=1;i<=n;i++)
    {
        fscanf(f,"%d",&x); S[i]=(S[i-1]+x)%k;
    }
    for (i=a;i<=n;i++)
    {
        for (j=a;j<=b && i-j+1>0;j++)
        {
            if (S[i]-S[i-j]==0) nrsol++;
        }
    }
    fprintf(g,"%lld",nrsol);
    return 0;
}