Cod sursa(job #31024)

Utilizator therain3rVlad Dumitrescu therain3r Data 15 martie 2007 13:23:35
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
#include<fstream.h>
long v[100000],n,div,min,max;
unsigned long nr_tot;
ifstream f("divk.in");
ofstream g("divk.out");
void citire()
{
f>>n>>div>>min>>max;
long i;
for(i=1;i<=n;i++)
    f>>v[i];
}
void rez()
{
long i,j,nr,s;
int ok;
for(i=1;i<=n-min+1;i++)
  {
   s=0;
   for(j=1;j<=min;j++)
      s=s+v[i+j-1];
   if(s%div==0)
       nr_tot++;
   for(j=min+1;j<=max&&i+j-1<=n;j++)
       {
	s=s+v[i+j-1];
	if(s%div==0)
	     nr_tot++;

       }
  }
}
int main()
{
citire();
rez();
g<<nr_tot;
f.close();
g.close();
return 0;
}