Cod sursa(job #70519)

Utilizator RobytzzaIonescu Robert Marius Robytzza Data 6 iulie 2007 11:40:21
Problema Divk Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<fstream.h>
long a[500000],N,A,B,K;
void citire(){
ifstream fin("divk.in");
fin>>N>>K>>A>>B;
for (long i=0;i<N;i++)
  fin>>a[i];
fin.close();
}
int numar(){
long long S=0,nr=0;
for (long i=A;i<=B;i++)
    for (long j=0;j<=N-i;j++){
       S=0;
       for (long h=j;h<j+i;h++)
	   S+=a[h];
       if (S%K==0)
	nr++;
	}
return nr;
}
int main(){
citire();
ofstream fout("divk.out");
fout<<numar();
fout<<"\n";
fout.close();
return 0;
}