#include<fstream>
using namespace std;
ifstream fin("divk.in");
ofstream fout("divk.out");
unsigned long long x[500005],s,nr=0;
int main()
{
int n,k,a,b;
fin>>n>>k>>a>>b;
int i;
for(i=1;i<=n;i++)
    fin>>x[i];
    for(i=1;i<=n;i++)
        x[i]=x[i]%k;

int j;
for(i=1;i<=n;i++){s=0;
    for(j=i;j<=n;j++)
        if(j-i+1<=b&&j-i+1>=a)
        {
        s+=x[j];
        if(s%k==0)
            nr++;}}
        fout<<nr;}