Cod sursa(job #505156)

Utilizator proflaurianPanaete Adrian proflaurian Data 30 noiembrie 2010 21:45:28
Problema Numerele lui Stirling Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 0.44 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;
}