Cod sursa(job #508196)

Utilizator stanescumalinStanescu Malin Octavian stanescumalin Data 7 decembrie 2010 19:38:49
Problema Pascal Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include <iostream.h>
#include <fstream.h>
//#include <string.h>
#include <math.h>



int main(int argc, char* argv[])
{
	long i, j, cnt=0, d, k;
	float f;
	ifstream fin("pascal.in");
	fin>>i;
	fin>>d;
	for(j=0; j<=i; j++){
		f = 1;
		for(k = j+1; k<=i; k++){
			f = f * k;
		}
		for(k=1; k<(i-j); k++){
			f = f/k;
		}
		long k = ceil(f);
		if(k%d == 0) cnt++;
	}
	ofstream fout("pascal.out");
	fout<<cnt;
	return 0;
}