Cod sursa(job #240576)

Utilizator raica_cristiraica dumitru cristian raica_cristi Data 7 ianuarie 2009 22:40:09
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 1.1 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);   
    if (r%2==1)   
        for (i=0; i<=r/2; ++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+=2;   
        }   
    else   
    {   
        for (i=0; i<r/2; ++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+=2;   
        }   
        for (aux=r, nr1=0; aux; nr1+=aux/=d);   
        for (aux=r-r/2, nr2=0; aux; nr2+=aux/=d);   
        for (aux=r/2, nr3=0; aux; nr3+=aux/=d);   
        if (nr1>nr2+nr3)   
            nrt++;   
    }   
    printf ("%d",nrt);   
    return 0;     
}