#include<fstream> 
using namespace std; 
ifstream f("divk.in");
ofstream g("divk.out");
long long N, K, A, B, sol;
long long V[500010], app[100010];
int main()
{
	long long i, x;
	f>>N>>K>>A>>B;
	for(i=1;i<=N;i++)
	{
          f>>x;
		  V[i]=(V[i-1]+x)%K;
	}
	for(i=1;i<=N;i++)
	{
          if(i-A>=0)
	      ++app[V[i-A]];
          if(i-B>0)
	      --app[V[i-B-1]];
	      sol += app[V[i]];
	}
	g<<sol;
	return 0;
}