Cod sursa(job #1132896)

Utilizator visshanelAlin Florin visshanel Data 4 martie 2014 00:23:15
Problema Pascal Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.6 kb
#include<fstream>

using std::ifstream;
using std::ofstream;

long fact(int nr)
{
    long i,f;
    
    if(nr==0 || nr==1)
        return 1;
    
    f=1;
    for(i=2;i<=nr;i++)
        f*=i;
    
    return f;
}

int main()
{
    int D,nr=0;
    long R;
    
    ifstream fin("pascal.in");
    ofstream fout("pacal.out");
    
    fin>>R>>D;
    
    for(long i=0;i<=R/2;i++)
        if(!((fact(R)/(fact(R-i)*fact(i)))%D))
            nr++;
    
    if(!(nr%2))
        fout<<nr*2-1;
    else
        fout<<nr*2;
    
    fin.close();
    fout.close();
    
    return 0;
}