Cod sursa(job #3251185)

Utilizator Panca_Eduard_GabrielPanca Eduard Gabriel Panca_Eduard_Gabriel Data 25 octombrie 2024 11:59:08
Problema Pascal Scor 20
Compilator cpp-64 Status done
Runda cex_1 Marime 0.43 kb
#include <bits/stdc++.h>
using namespace std;
ifstream fin("pascal.in");
ofstream fout("pascal.out");
long long int fact(long long int n)
{
int s=1;
while ( n > 1 )
{
s=s*n;
n--;
}
return s;
}
long long int pascal(long long int n,long long int d)
{
int S=0;
for (int i=1; i<=n; i++ )
{
if ( (fact(n)/(fact(n-i)*fact(i))) % d == 0 ) S++;
}
return S;
}
int main()
{
    long long int r,d;
    fin>>r>>d;
    fout<<pascal(r,d);
    return 0;
}