Cod sursa(job #2039618)

Utilizator titusbogaBoga Titus Nicolae titusboga Data 14 octombrie 2017 18:21:38
Problema Pascal Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <bits/stdc++.h>
using namespace std;
FILE *f=fopen("pascal.in","r");
FILE *g=fopen("pascal.out","w");
int n,d,k=0;

int calculare(int x,int y)
{
    if(y==0||y==n)
        return 1;
    int a=1,b=1,c=1;
    for(int i=1;i<=x;++i)
        a*=i;
    for(int i=1;i<=y;++i)
        b*=i;
    for(int i=1;i<=x-y;++i)
        c*=i;
    return a/(b*c);
}

int main()
{
    fscanf(f,"%d%d",&n,&d);
    for(int i=0;i<=n;++i)
        if(calculare(n,i)%d==0)
            k++;
    fprintf(g,"%d",k);
    return 0;
}