Cod sursa(job #2275551)

Utilizator danhorea2010Horica danhorea2010 Data 3 noiembrie 2018 11:59:19
Problema Pascal Scor 20
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.68 kb
#include <iostream>
#include <fstream>
#include <string.h>
#include <math.h>

using namespace std;

ifstream in("pascal.in");
ofstream out("pascal.out");

long long val(long long i ,long long j )
{
  long long pi = 1;
  long long pj = 1;
  long long pipj = 1;
  long long t = i-j;

  for(long long k = 2 ; k<=i;++k)
      pi *= k;
  for(long long k = 2;  k<=j;++k)
      pj *= k;

  for(long long k = 2; k<=t ; ++k)  
      pipj *= k;

  
 return (pi/(pipj*pj)); 

}


int main()
{
  long long n , ct = 0,d ;
  long long nr;  
  in>> n >> d; 
  
  for(long long j = 0 ; j <= n ; ++j)
  {
    if ( val(n,j) % d == 0 )
      ++ct;

  }
   out<<ct<<'\n'; 
}