Cod sursa(job #644565)

Utilizator bia.liliPoenar Liana bia.lili Data 6 decembrie 2011 23:00:10
Problema Permutari2 Scor 90
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include<fstream>
using namespace std;
int m,n,i,j,k,v[301],M[301][301];
ifstream q("permutari2.in");
ofstream w("permutari2.out");
int main()
{q>>n>>m;
v[0]=1;
for(i=1;i<=n;i++)
v[i]=(v[i-1]*i)%10007;
M[1][1]=1;
for(i=2;i<=n;i++)
{M[i][1]=v[i];
for(j=2;j<=n&&j<=i;j++)
{M[i][j]=0;
for(k=j-1;k<=i;k++)
M[i][j]=(M[i][j]+M[k][j-1]*M[i-k][1])%10007;
M[i][1]=(M[i][1]-M[i][j]+10007)%10007;}}
w<<M[n][m]<<"\n";
return 0;}