Cod sursa(job #1387729)

Utilizator Alex_AeleneiAlex Aelenei Ioan Alex_Aelenei Data 14 martie 2015 17:11:22
Problema Kperm Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.79 kb
#include <fstream>
using namespace std;
ifstream in ( "kperm.in" ) ;
ofstream out ( "kperm.out" ) ;
int main ()
{

    long long n , k , rez , p , i , r , l = 1 ;
    in >> n >> k ;
    r = n % k ;
    p = n / k ;
    rez = 1 ;
    for ( i = 1 ; i <= r ; i ++ )
        rez = ( rez * i ) % 666013 ;
    for ( i = 1 ; i <= p + 1 ; i ++ )
        l = ( l * i ) % 666013 ;
    for ( i = 1 ; i <= r ; i ++ )
        rez = ( rez * l ) % 666013 ;
    for ( i = 1 ; i <= k - r ; i ++ )
    rez = ( rez * i ) % 666013 ;
    l = 1 ;
    for ( i = 1 ; i <= p ; i ++ )
        l = ( l * i ) % 666013 ;
    for ( i = 1 ; i <= k - r ; i ++ )
        rez = ( rez * l ) % 666013 ;
    if ( k % 2 == 0 )
        rez = 0 ;
    out << rez << endl ;
    in.close();
    out.close();
    return 0;
}