Cod sursa(job #950202)
| Utilizator | Data | 16 mai 2013 09:15:32 | |
|---|---|---|---|
| Problema | Pascal | Scor | 30 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.45 kb |
#include <iostream>
#include <fstream>
using namespace std;
ifstream in ("pascal.in");
ofstream out("pascal.out");
int const N=5000005;
int r,d,rez,c[2][N];
int main()
{
in>>r>>d; r++;
c[1][0]=c[0][0]=1;
for(int n=1;n<r;n++)
for(int k=0;k<=n;k++)
c[(n+1)%2][k+1]=c[n%2][k]+c[n%2][k+1];
int m=r%2;
for(int j=0;j<r;j++)
if(c[m][j]%d==0)
rez++;
out<<rez<<"\n";
return 0;
}
