#include <fstream>

using namespace std;
ifstream fin("divk.in");
ofstream fout("divk.out");
int n,k,a,b,x,i,c[500002],s[100001];
long long t;
int main()
{
    fin>>n>>k>>a>>b;
    for(i=1;i<=n;i++)
    {
    	fin>>x;
    	c[i]=c[i-1]+x;
    	c[i]=c[i]%k;
    	if(i>=a)
			s[c[i-a]]++;
    	if(i>b)
    		s[c[i-b-1]]--;
		t=t+s[c[i]];
    }
    fout<<t;
    return 0;
}