Cod sursa(job #324343)

Utilizator aladinaladin aladinn aladin Data 15 iunie 2009 20:02:49
Problema Pascal Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include <stdio.h>
int main()
{int r,d,i,nr,exp,v[5000009];
 freopen("pascal.in","r",stdin);
 freopen("pascal.out","w",stdout);
 scanf("%d %d",&r,&d);v[1]=0;r++;
 
 if (d==1) printf("%d",r-1); else
 {nr=1;exp=0;v[1]=0;
 for (i=2;i<=r;i++)
 {
 if (nr*d==i) 
   {v[i]=v[i-1]+1+exp;
    nr*=d;
	exp++;
   } 
   else v[i]=v[i-1];
   //printf("%d %d\n",i,v[i]);
 }
 for (i=2,nr=0;i<r;i++)
   if  (v[r]-v[r-i]-v[i]>=0)	 nr++;
  printf("%d",nr);
 }
 return 0;

}