#include <iostream>
#include<fstream>
using namespace std;
int n,a,b,s[500002],k;
long long sol;
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];
    }
      for(int i=a;i<=b;i++)
        for(int j=i;j<=n;j++)
        if((s[j]-s[j-i])%k==0)sol++;
    g<<sol;
    return 0;
}