Cod sursa(job #1125766)

Utilizator TediConstantinescu Adrian Tedi Data 26 februarie 2014 19:21:25
Problema Pascal Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
#include <iostream>
#include <fstream>
using namespace std;
int fact(int a)
{
	int sum=1;
	if(a==0 || a==1) 
		return 1;
	else
		for(int b=1; b<=a; b++)
			sum=sum*b;
	return sum;
}
int main()
{
	ifstream fin("pascal.in");
	ofstream fout("pascal.out");
	int n;
	int D;
	int nr=0;
	int a[5000];
	fin>>n;
	fin>>D;
	if(D<2 || D>6)
	{
		fout<<0;
		return 0;
	}
	for(int j=0; j<=n; j++)
			a[j]=fact(n)/(fact(n-j)*fact(j));

	for(int i=0; i<=n/2; i++)
	{
		if(a[i]%D==0)
			nr++;
	}
		fout<<nr*2;
	//system("pause");
	return 0;
}