#include <fstream>
#define NM 100002
using namespace std;
ifstream f("divk.in");
ofstream g("divk.out");
unsigned long long n,k,A,B,i,j,nr,a;
unsigned long long x[NM*5];
int main()
{
    f>>n>>k>>A>>B;
    for(i=1;i<=n;i++)
        { f>>a; x[i]=a%k+x[i-1]; }
    nr=0;
    for(i=A;i<=n;i++){
        for(j=A;j<=B&&i-j+1>0;j++)
            if((x[i]-x[i-j])%k==0) nr++;
    }
    g<<nr<<'\n';
    return 0;
}