#include<stdio.h>

long long nr,x,y,sol,n,k,a,b,i,j,s,v[500011],r[100011];


int main(){


FILE *f=fopen("divk.in","r");
fscanf(f,"%lld %lld %lld %lld",&n,&k,&a,&b);

for(i=1;i<=n;i++){
fscanf(f,"%lld",&j);
v[i]=(v[i-1]+j)%k;
}

fclose(f);


s=0;
y=0;
x=a-b;

  for(i=x;i<=y;i++){

    if(i>=0){
    r[v[i]]++;
    }

  }


  for(i=a;i<=n;i++){

  sol=v[i];

    nr+=(r[sol]);


  if(x>=0)  r [ v[x] ]--;
  x++;

  y++;

  r[ v[y] ]++;

  }


  FILE *g=fopen("divk.out","w");
  fprintf(g,"%lld",nr);
  fclose(g);

return 0;
}