Cod sursa(job #28406)

Utilizator bacerandreiBacer Andrei bacerandrei Data 7 martie 2007 19:51:17
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<fstream.h>
long n,k,a,b,x[100],i,j,t,nr,s;
int main()
{
  ifstream f("divk.in");
  ofstream g("divk.out");
   f>>n>>k>>a>>b;
    for(i=1;i<=n;i++)
     f>>x[i];
   i=a;
    while(i<=b)
     {
      for(j=1;j<=n-i+1;j++)
       {
	s=0;
	for(t=j;t<=j+i-1;t++)
	 s=s+x[t];
	if(s%k==0)
	 nr++;
	}
      i++;
     }
    g<<nr;
   return 0;
}