Cod sursa(job #899846)

Utilizator roxannemafteiuMafteiu-Scai Roxana roxannemafteiu Data 28 februarie 2013 16:38:43
Problema Kperm Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include<stdio.h>
FILE *in,*out;
int n,k,i,nr[5001],suma,kontor,sumaurm;
int main()
{
    in=fopen("kperm.in","rt");
    out=fopen("kperm.out","wt");
    fscanf(in,"%d%d",&n,&k);
    nr[1]=1;
    for(i=2;i<=n;i++)
      {
       suma+=nr[i];
       sumaurm+=nr[i+1];
       if(!(suma%k) )
         kontor++;
        if(!(sumaurm%k))
          kontor++;


      }
      fprintf(out,"%d",kontor);
    fclose(in);
    fclose(out);
    return 0;
}