#include<fstream>
using namespace std;

int a[500001],v[100001],i,n,k,x,y,t;
long long sol;

int main()
{
	ifstream f("divk.in");
	ofstream g("divk.out");
	f >> n >> k >> x >> y;
	for (i=1;i<=n;i++)
	{
		f >> t;
		a[i]=(a[i-1]+t)%k;
		if ((i>=x) && (i<=y) && (a[i]==0))
			sol++;
	}
	for (i=x+1;i<=n;i++)
	{
		v[a[i-x]]++;
		if (i>y+1)
			v[a[i-y-1]]--;
		sol+=v[a[i]];
	}
	g << sol;
	return 0;
}