Cod sursa(job #1224144)
Utilizator | Necula Narcis Narcis_Necula | Data | 29 august 2014 21:50:51 |
---|---|---|---|
Problema | Kperm | Scor | 100 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.55 kb |
#include<stdio.h>
long long v[5001];
int main()
{
FILE *fin,*fout;
fin=fopen("kperm.in","r");
fout=fopen("kperm.out","w");
int n,k;
fscanf(fin,"%d%d",&n,&k);
v[0]=1;
int i;
for(i=1;i<=n;i++)
v[i]=(v[i-1]*i)%666013;
int x=n%k;
long long nr=0;
if(k%2!=0)
{
nr=(v[x]*v[k-x]);
nr%=666013;
for(i=1; i<=x; i++)
nr=(nr*v[n/k+1])%666013;
for(i=1; i<=k-x; i++)
nr=(nr*v[(n/k)])%666013;
}
fprintf(fout,"%lld",nr);
return 0;
}