Cod sursa(job #505154)

Utilizator proflaurianPanaete Adrian proflaurian Data 30 noiembrie 2010 21:43:14
Problema Numerele lui Stirling Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 0.48 kb
#include<cstdio>
#define M 98999
int i,j,k,s[2][201][201];
int main()
{
    s[0][1][1]=s[1][1][1]=1;
    for(i=2;i<=200;i++)
        for(j=1;j<=i;j++)
        {
            s[0][i][j]=(s[0][i-1][j-1]-(i-1)*s[0][i-1][j])%M;
            s[1][i][j]=(s[1][i-1][j-1]+j*s[1][i-1][j])%M;
        }
	freopen("stirling.in","r",stdin);
    freopen("stirling.out","w",stdout);
    scanf("%d",&i);
    for(;scanf("%d%d%d",&k,&i,&j)+1;)
        printf("%d\n",s[k-1][i][j]);
	return 0;
}