Cod sursa(job #2254579)

Utilizator al3xunmisterBlagescu Alex-George al3xunmister Data 5 octombrie 2018 16:34:02
Problema Pascal Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include <fstream>
using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int pascal(int r,int d)
{
    long long nr=0,x=1,y=1,z=1;
    for (int i=1;i<=r;i++)
        x=x*i;
    for (int i=1;i<r;i++)
    {
        for (int j=1;j<=i;j++)
            y=y*j;
        for (int j=1;j<=r-i;j++)
            z=z*j;
        int n=x/(y*z);
        if (n%d==0) nr++;
        y=z=1;
    }
    return nr;
}
int main()
{
    int d,r;
    f>>r>>d;
    g<<pascal(r,d);
    return 0;
}