# include <stdio.h>
long int c[10000],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;
}