Cod sursa(job #60516)

Utilizator anna_bozianuBozianu Ana anna_bozianu Data 14 mai 2007 22:43:45
Problema Divk Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
#include<stdio.h>
long int t=0,l,s,i,j,a,b,k,x[500],n;
int main()
{	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",&x[i]);
   for(i=1;i<=n-a+1;i++)
   	{  l=a; s=0;
      	for(j=i;j<i+a;j++) s+=x[j];
         if(s%k==0) t++;
         j=i+a;
         while(l<b){ l++;
         				s+=x[j];
                     if(s%k==0) t++;
                     j++;
                     }
      }
   fprintf(g,"%ld",t);
   return 0;
   fcloseall();
}