Cod sursa(job #2420536)

Utilizator DavidAA007Apostol David DavidAA007 Data 12 mai 2019 15:08:21
Problema Kperm Scor 100
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.58 kb
#include<fstream>
#define m 666013
using namespace std;
ifstream fin ("kperm.in");
ofstream fout("kperm.out");
long long p,c,n,k,r,i,j,a;
int main()
{
    fin>>n>>k;
    c=n/k;
    r=n%k;
    if(k%2==0)
    {
        fout<<0;
        return 0;
    }
    p=1;a=1;
    for(i=1;i<=c+1;i++)
        a=(a*i)%m;
    for(i=1;i<=r;i++)
        p=(p*a)%m;
    a=1;
    for(i=1;i<=c;i++)
        a=(a*i)%m;
    for(i=1;i<=k-r;i++)
        p=(p*a)%m;
    a=1;
    for(i=1;i<=r;i++)
        a=(a*i)%m;
    p=(p*a)%m;
    a=1;
    for(i=1;i<=k-r;i++)
        a=(a*i)%m;
    fout<<(p*a)%m;
    return 0;
}