Pagini recente » Cod sursa (job #2237643) | Cod sursa (job #3172992) | Cod sursa (job #3169006) | Cod sursa (job #951625) | Cod sursa (job #68680)
Cod sursa(job #68680)
#include<stdio.h>
#define Nm 5001
#define Mod 666013
int n,k,sol;
void read()
{
freopen("kperm.in","r",stdin);
scanf("%d%d",&n,&k);
}
void solve()
{
int F[Nm],i,a,b;
F[0]=1;
for(i=1;i<=n;++i)
F[i]=F[i-1]*(long long)i%Mod;
a=n%k; b=k-a;
sol=(long long)F[a]*F[b]%Mod;
for(i=0;i<a;++i)
sol=(long long)sol*F[n/k+1]%Mod;
for(i=0;i<b;++i)
sol=(long long)sol*F[n/k]%Mod;
}
void write()
{
freopen("kperm.out","w",stdout);
printf("%d\n",sol);
}
int main()
{
read();
solve();
write();
return 0;
}