#include <iostream>
#include<fstream>
using namespace std;
long long n,m,a,b,s[500006],k,sol,l;
int main()
{
  ifstream f("divk.in");
  ofstream g("divk.out");
  f>>n>>k>>a>>b;
    for(int i=1;i<=n;i++)
    {
        f>>s[i];
        s[i]+=s[i-1];
    }
    m=b-a;
    for(int i=0;i<=n-m;i++)
        {if(i+b<n)l=i+b;
        else l=n;
            for(int j=i+a;j<=l;j++)
        if((s[j]-s[i])%k==0)sol++;


        }
    g<<sol;
    return 0;
}