Cod sursa(job #1343539)

Utilizator iulianrotaruRotaru Gheorghe-Iulian iulianrotaru Data 15 februarie 2015 16:29:01
Problema Kperm Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.42 kb
#include<fstream>
using namespace std;
ifstream f("kperm.in"); ofstream g("kperm.out");
long long n,k,i,r,nr,fact[5002];
int main()
{   f>>n>>k; fact[0]=1;
    for(i=1;i<=n;i++) fact[i]=(fact[i-1]*i)%666013;
    r=n%k;
    if(k&1)
    {   nr=(fact[r]*fact[k-r])%666013;
        for(i=1;i<=r;i++) nr=(nr*fact[n/k+1])%666013;
        for(i=1;i<=k-r;i++) nr=(nr*fact[(n/k)])%666013;
    }
    g<<nr; g.close(); return 0;
}