Cod sursa(job #2258865)

Utilizator lucianistratiIstrati Lucian lucianistrati Data 12 octombrie 2018 12:08:50
Problema Pascal Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.41 kb
#include <iostream>
#include <fstream>
using namespace std;
int fact(int n)
{
    if(n==0)
    return 1;
    else
    return n*fact(n-1);
}
int main()
{
   ifstream fin("pascal.in");
   ofstream fout("pascal.out");
   int R,D,i,t=0;
   fin>>R>>D;
   for(i=0;i<=R-1;i++)
   {
       if((fact(R)/(fact(R-i)*fact(i)))%D==0)
         t++;
   }
   fout<<t;
   fin.close();
   fout.close();
   return 0;
}