# include <stdio.h>   
long int c[120000],i,j,n,q,k,a,b,s;   
int main ()   
{   
freopen ("divk.in","r",stdin);   
freopen ("divk.out","w",stdout);   
scanf ("%li",&n);   
scanf ("%li",&k);   
scanf ("%li",&a);   
scanf ("%li",&b);   
for (i=0;i<n;i++)   
scanf ("%li",&c[i]);   
for (i=0;i<n-1;i++)   
{   
s=c[i];   
for (j=i+1;j<n;j++)   
{   
s=s+c[j];   
if (j-i+1>=a && j-i+1<=b)   
if (s%k==0)   
q++;   
}   
}   
printf ("%li",q);   
return 0;   
}