#include<cstdio>
#include<string>
#include<algorithm>
#define infile "divk.in"
#define outfile "divk.out"
#define L 500005
using namespace std;

void citeste();
void rezolva();
void afiseaza();

int n;
int x[L];
long long s[L];
long long sol=0;
int k,a,b;



void citeste()
{
	freopen(infile,"r",stdin);
	
	scanf("%d",&n);
	scanf("%d%d%d",&k,&a,&b);
	
	for(int i=1;i<=n;i++)
	{
		scanf("%d",&x[i]);
		s[i]=s[i-1]+x[i];
	}
	
	
	fclose(stdin);
}


void rezolva()
{
	for(int i=a;i<=n;i++)
	{
		long long sc=0,sc2;
		
		sc=s[i];
		
		for(int j=a;j<=b;j++)
		{
			sc2=sc-s[i-j];
			if(sc2%k==0) sol++;
		}
	}
}




void afiseaza()
{
	freopen(outfile,"w",stdout);
	
	printf("%lld",sol);
	
	fclose(stdout);
}


int main()
{
	citeste();
	rezolva();
	afiseaza();
	
	return 0;
}