Cod sursa(job #2397037)

Utilizator Anakin1001George Giorgiu Gica Anakin1001 Data 4 aprilie 2019 09:17:12
Problema Kperm Scor 40
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.61 kb
#include <fstream>
#define mod 666013
using namespace std;
ifstream f("kperm.in");
ofstream g("kperm.out");
int P,c,n,k,r,i,j,a;
int main()
{   f>>n>>k;
    c=n/k;
    r=n%k;
    if(k%2==0){
        g<<0;
        return 0;
    }
    P=1;a=1;
    for(i=1;i<=r;i++)
        a=(a*i)%mod;
    P=(P*a)%mod;
    a=1;
    for(i=1;i<=k-r;i++)
        a=(a*i)%mod;
    P=(P*a)%mod;
    a=1;
    for(i=1;i<=c+1;i++)
        a=(a*i)%mod;
    for(i=1;i<=r;i++)
        P=(P*a)%mod;
    a=1;
    for(i=1;i<=c;i++)
        a=(a*i)%mod;
    for(i=1;i<=k-r;i++)
        P=(P*a)%mod;
    g<<P;
    return 0;
}