Cod sursa(job #33188)

Utilizator kyrkDragos Dumitrescu kyrk Data 18 martie 2007 23:18:44
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.42 kb
#include<stdio.h>
main()
{
long v[10000],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++)
    {  s+=v[j];
       d=j-i;d++;
       if((d>=a)&&(s%k==0))x++;
    }
 }

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