Cod sursa(job #239903)
Utilizator | Data | 6 ianuarie 2009 08:56:09 | |
---|---|---|---|
Problema | Pascal | Scor | 30 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.47 kb |
#include <algorithm>
using namespace std;
int r,d,nrt;
int main ()
{
freopen ("pascal.in","r",stdin);
freopen ("pascal.out","w",stdout);
int i,aux,nr1,nr2,nr3;
scanf ("%d%d",&r,&d);
for (i=0; i<r; ++i)
{
for (aux=r, nr1=0; aux; nr1+=aux/=d);
for(aux=r-i, nr2=0; aux; nr2+=aux/=d);
for(aux=i, nr3=0; aux; nr3+=aux/=d);
if(nr1>nr2+nr3)
++nrt;
}
printf ("%d",nrt);
return 0;
}