Pagini recente » Cod sursa (job #908117) | Cod sursa (job #2054391) | Cod sursa (job #1644626) | Cod sursa (job #1729388) | Cod sursa (job #82734)
Cod sursa(job #82734)
Utilizator |
|
Data |
8 septembrie 2007 18:11:31 |
Problema |
Kperm |
Scor |
30 |
Compilator |
cpp |
Status |
done |
Runda |
Arhiva de probleme |
Marime |
1.39 kb |
using namespace std;
#define MOD 666013
#define ll long long
#include <stdio.h>
FILE *fin=fopen("kperm.in","r"),
*fout=fopen("kperm.out","w");
int n,k,r,c;
ll sol;
int main()
{
fscanf(fin,"%d %d",&n,&k);
if (k%2==0)
{
fprintf(fout,"0\n");
return 0;
}
else
{
int i;
ll fact=1; sol=1;
c=n/k; r=n%k;
for (i=2; i<=r; i++)
{
fact=(long long)(fact*i);
fact%=MOD;
}
sol=(long long)(sol*fact);
sol%=MOD;
fact=1;
for (i=2; i<=k-r; i++)
{
fact=(long long)(fact*i);
fact%=MOD;
}
sol=(long long)(sol*fact);
sol%=MOD;
fact=1;
for (i=2; i<=c+1; i++)
{
fact=(long long)(fact*i);
fact%=MOD;
}
ll p=fact;
for (i=2; i<=r; i++)
{
fact=(long long)(fact*p);
fact%=MOD;
}
if (r==0) fact=1;
sol=(long long)(sol*fact);
sol%=MOD;
fact=1;
for (i=1; i<=c; i++)
{
fact=(long long)(fact*i);
fact%=MOD;
}
p=fact;
for (i=1; i<=k-r; i++)
{
fact=(long long)(fact*p);
fact%=MOD;
}
// if (k-r==0) fact=1;
sol=(long long)(sol*fact);
sol%=MOD;
fprintf(fout,"%lld\n",(long long)sol);
}
return 0;
}