Cod sursa(job #1377628)

Utilizator dex4Darjan Catalin dex4 Data 5 martie 2015 23:12:04
Problema Pascal Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include <iostream>
#include <fstream>

int fact(int x){
    int f=1;
    for(int i=1; i<=x; i++)
        f=f*i;
    return f;
}

int comb(int n, int k){
    return fact(n)/(fact(k)*fact(n-k));
}

using namespace std;

int r, d, nr;

int main()
{
    ifstream f("pascal.in");
    f >> r >> d;
    ofstream g("pascal.out");
    for(int i=1; i<=r; i++){
        if(comb(r, i)%d == 0)
            nr++;
    }
    g << nr;
    return 0;
}