#include <stdio.h>

FILE *in, *out;

int n,k,a,b,i,rez,s[500005],v[500005];

int main()
{
	in=fopen("divk.in","r");
	out=fopen("divk.out","w");
	
	fscanf(in,"%d %d %d %d\n",&n,&k,&a,&b);
	
	for(i=1;i<=n;i++)
	{	
		fscanf(in,"%d\n",&s[i]);
		
		s[i]+=s[i-1];
		
		//printf("%d ",s[i]);
	}
	
	for(i=0;i<=b-a;i++)
	{
		v[s[i]%k]++;
		
		rez+=v[s[i+a]%k];
	}	
	
	for(i=b-a;i<=n-a;i++)
	{
		v[s[i-(b-a)]%k]--;
		v[s[i]%k]++;
		
		rez+=v[s[i+a]%k];
	}	
	
	fprintf(out,"%d",rez);
	
	fclose(out);
	
	return 0;
}