Cod sursa(job #996313)

Utilizator DorelBarbuBarbu Dorel DorelBarbu Data 11 septembrie 2013 16:45:21
Problema Kperm Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.86 kb
#include <iostream>
#include <fstream>
#include <stdio.h>
#define mod 666013
using namespace std;
int n, k, r, c ;

void citire()
{
    ifstream in("kperm.in");

    in>>n>>k;

    c=n/k;

    r=n%k;
}

int factorial(int n)
{
    int i, ans=1 ;

    for(i=1; i<=n; i++)
    {
        ans=(1LL*ans*i)%mod;
    }

    return ans;
}

int putere(int n, int k)
{
    int ans=1, i;

    for(i=1; i<=k; i++)
    {
        ans=(1LL*ans*n)%mod;
    }

    return ans;
}

int main()
{

    ofstream out("kperm.out");

    long long answer;

    citire();

    if(k%2)
    {
        answer=1LL*factorial(r)*factorial(k-r)%mod;
        answer=1LL*answer*putere(factorial(c+1),r)%mod;
        answer=1LL*answer*putere(factorial(c),k-r)%mod;

    }
    else
    {
        answer=0;
    }

    out<<answer;

    return 0;
}