Cod sursa(job #27857)

Utilizator FlorianFlorian Marcu Florian Data 7 martie 2007 10:50:16
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.4 kb
#include<stdio.h>
int main()
{long i,j,v[500000],n,k,a,b,p,nrsol=0,s;
FILE *f=fopen("divk.in","r");
FILE *g=fopen("divk.out","w");
fscanf(f,"%ld %ld %ld %ld",&n,&k,&a,&b);
for (i=1;i<=n;i++) fscanf(f,"%ld",&v[i]);
for (i=1;i<=n;i++)
	{p=a;
	while (p<=b)
		{
		s=0;
		for (j=i;j<i+p;j++)
			s=s+v[j];

		if (s%k==0) nrsol++;
		p++;}
		}
fprintf(g,"%ld",nrsol);
fclose(f);
fclose(g);
return 0;}