Cod sursa(job #1635552)

Utilizator Julian.FMI Caluian Iulian Julian. Data 6 martie 2016 18:46:22
Problema Numerele lui Stirling Scor 10
Compilator cpp Status done
Runda Arhiva educationala Marime 0.69 kb
#include <iostream>
#include <fstream>
#define nmax 202
#define mod 98999
using namespace std;
ifstream fin("stirling.in");
ofstream fout("stirling.out");

long s[nmax][nmax];
long S[nmax][nmax];

void calcS()
{int i,j;
    S[1][1]=1;
    for(i=1;i<=200;i++)S[i][1]=1;
    for(i=2;i<=200;i++)
        for(j=2;j<=i;j++)
        S[i][j]=(S[i-1][j-1]+j*S[i-1][j])%mod;
}

void calcs()
{int i,j;
    s[1][1]=1;
    for(i=2;i<=200;i++)
        for(j=1;j<=i;j++)
        s[i][j]=(s[i-1][j-1]-(i-1)*s[i-1][j])%mod;
}


int main()
{int t,tip,x,y;
calcs();
calcS();
    fin>>t;
    while(t--)
    {fin>>tip>>x>>y;
    if(tip==1)fout<<s[x][y];
    else fout<<S[x][y];

    }

}