Cod sursa(job #33198)

Utilizator kyrkDragos Dumitrescu kyrk Data 18 martie 2007 23:25:19
Problema Divk Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include<stdio.h>
main()
{
long v[500000],n,k,a,b,i,j,s,x=0,d;
freopen("divk.in","r",stdin);
freopen("divk.out","w",stdout);
fscanf(stdin,"%ld%ld%ld%ld",&n,&k,&a,&b);
for(i=1;i<=n;i++)
 fscanf(stdin,"%ld",&v[i]);
for(i=1;i<=(n-a)+1;i++)
 { s=0;d=0;
   for(j=i;((d<b)&&(j<=n));j++)
    {  s+=v[j];
       d=j-i;d++;
       if((d>=a)&&(s%k==0))x++;
    }
 }

fprintf(stdout,"%ld",x);
fclose(stdin);
fclose(stdout);
return 0;
}