Cod sursa(job #534085)

Utilizator Anamaria20Cotirlea Anamaria Anamaria20 Data 15 februarie 2011 09:32:09
Problema Permutari2 Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.55 kb
#include <stdio.h>

FILE *f,*s;

int m,n,i,j,k,v1[305],v2[305][305];

int main()
{
	f=fopen("permutari2.in","r");
	s=fopen("permutari2.out","w");
	
	fscanf(f,"%d %d",&n,&m);
	
	v1[0]=1;
	
	for(i=1;i<=n;i++)
		v1[i]=(v1[i-1]*i)%10007;
	
	v2[1][1]=1;

	for(i=2;i<=n;i++)
	{
		v2[i][1]=v1[i];

		for(j=2;j<=n&&j<=i;j++)
		{
			v2[i][j]=0;

			for(k=j-1;k<=i;k++)
				v2[i][j]=(v2[i][j]+v2[k][j-1]*v2[i-k][1])%10007;

			v2[i][1]=(v2[i][1]-v2[i][j]+10007)%10007;

		}
	}

	fprintf(s,"%d\n",v2[n][m]);
	
	fclose(s);
	
	return 0;
}