Cod sursa(job #244303)

Utilizator ConsstantinTabacu Raul Consstantin Data 14 ianuarie 2009 21:21:04
Problema Divk Scor 50
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.51 kb
#include<stdio.h>
long long int x[500011],sum,a,b,k,nr,n,i,j;
int main(){
FILE *f=fopen("divk.in","r");
fscanf(f,"%lld %lld %lld %lld",&n,&k,&a,&b);
for(i=1;i<=n;i++)
        {fscanf(f,"%lld",&j);
        sum+=j;
        sum%=k;
        x[i]=sum;
        if(sum==0&&i>=a&&i<=b)nr++;}

fclose(f);

for(i=1;i<=n;i++)
        {for(j=i+a;j<=i+b&&j<=n;j++)
                if(x[j]==x[i])
                nr++;
                }
FILE *g=fopen("divk.out","w");
fprintf(g,"%lld",nr);
fclose(g);
return 0;}