Cod sursa(job #448142)

Utilizator nicolaetitus12Nicolae Titus nicolaetitus12 Data 2 mai 2010 21:06:15
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.48 kb
#include <stdio.h>
#define N 5000001
int scor[N];
int main ()
{int n,d,i,j,ct;
 freopen("pascal.in","r",stdin);
 freopen("pascal.out","w",stdout);
 scanf("%d %d",&n,&d);
 for (i=1;i<=n;i++)
 {for (j=d;j<=i;j*=d)
  {scor[i]+=i/j;
  }
//  printf("%d %d\n",i,scor[i]);
 }
 
 for (ct=0,i=1;i<=(n-1)/2;i++)
 {if((scor[n]-scor[i]-scor[n-i])>0)
  {ct++;
  }
 }
 ct*=2;
 if(n%2==0)
 {if((scor[n]-scor[n/2]-scor[n/2])>0)
  {ct++;
  }
 }
 printf("%d",ct);
 return 0;
}