Cod sursa(job #2156657)

Utilizator RazvanGutaGuta Razvan Alexandru RazvanGuta Data 8 martie 2018 21:46:04
Problema Pascal Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<fstream>
using namespace std;
ifstream f("pascal.in");
ofstream g("pascal.out");
int n,d,sol,i,k;
unsigned long long comb[5000001];
int main()
{
    f>>n>>d;
    comb[0]=1;
    comb[1]=n;
    if(n%d==0)
        sol++;
    for(i=2;i<=n;i++)
    {
        comb[i]=((n+i-1)*comb[i-1]/i);
    if(comb[i]%d==0)
        sol++;
    }
    g<<sol;
}