Cod sursa(job #1684519)

Utilizator metrix007Lungu Ioan Adrian metrix007 Data 11 aprilie 2016 09:31:56
Problema Pascal Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <iostream>
#include <fstream>
using namespace std;
#define RMAX 5000001
int r,d,l=0;
int c[2][RMAX];
int contor;

int main()
{
    ifstream in("pascal.in");
    ofstream out("pascal.out");
    in >> r >> d;
    c[1][1]=1%d;c[1][2] = 1%d;
	l = 0;
	for(int i=2;i<=r;i++)
	{
		for(int j=1;j<=(i+1)/2;j++)
		{
			c[l][j] = (c[l^1][j]%d + c[l^1][j-1]%d)%d;

		}
		l = l^1;
	}
	l=l^1;
	for(int i=1;i<=(r+1)/2+1;i++)
		if(c[l][i]==0) contor++;


	if(r%2==0) out << (contor*2)-1;
	else	out<< (contor*2);
    return 0;
}