Cod sursa(job #378993)
Utilizator | Data | 30 decembrie 2009 11:16:12 | |
---|---|---|---|
Problema | Pascal | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.44 kb |
#include <vector>
#include <fstream>
/*
*
*/
using namespace std;
int main()
{int n, k, i, j, nr=0;
ifstream in("pascal.in");
in>>n>>k;
vector<int> v(n), v2(n);
v[0]=1; v[1]=1;
for( i=2; i <= n; ++i )
{v2[0]=1;
for( j=1; j < i; ++j )
v2[j]=v[j]+v[j-1];
v2[j]=1;
v=v2;
}
ofstream out("pascal.out");
for( i=0; i < n; ++i )
if( 0 == v[i]%k )
++nr;
out<<nr;
}