Cod sursa(job #24562)

Utilizator yulianuvbchgchgcgchgcf yulianu Data 2 martie 2007 21:10:50
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.51 kb
#include<stdio.h>
FILE *f=fopen("divk.in","r");
FILE *g=fopen("divk.out","w");
int n,a[100],k,A,B,i,j,t,s,y;
void read()
{
fscanf(f,"%d",&n);
fscanf(f,"%d",&k);
fscanf(f,"%d",&A);
fscanf(f,"%d",&B);
for(i=1;i<=n;i++)
	fscanf(f,"\n %d",&a[i]);
}

void calc()
{
if(A-B>0) y=A-B;
else y=-(A-B);
for(i=1;i<=n-y;i++)
	{
	s=0;
	for(j=i;j<=i+y+1;j++)
		{s+=a[j];
		if(s%k==0) t++;}
	}
}

void write()
{
fprintf(g,"%d",t);
}

int main()
{
read();
calc();
write();
fcloseall();
return 0;
}