Cod sursa(job #734030)

Utilizator dicu_dariaDaria Dicu dicu_daria Data 13 aprilie 2012 14:07:46
Problema Pascal Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.4 kb
#include <fstream>
using namespace std;
int x,i,d,n,sol,div[5000010];
int main()
{
    ifstream fi("pascal.in");
    ofstream fo("pascal.out");
    fi>>n>>d;
    for(i=1;i<=n;i++)
    {
        //calculez divizorii pentru i!
        x=i;
        while(x%d==0) { div[i]++; x/=d; }
        div[i]+=div[i-1];
    }
    for(i=0;i<=n;i++) if(div[n]>div[i]+div[n-i]) sol++;
    fo<<sol<<"\n";
    return 0;
}