Pagini recente » Cod sursa (job #279932) | Cod sursa (job #2488263) | Cod sursa (job #1596069) | Cod sursa (job #900844) | Cod sursa (job #27943)
Cod sursa(job #27943)
#include<stdio.h>
#define konst 666031
long long fact(long long x)
{long long f=1,i;
for(i=2;i<=x;i++)
f=(f*i)%konst;
return f;
}
long long power(long long baza,long long exp)
{long long po,i;
po=1;
for(i=1;i<=exp;i++)
po=(po*baza)%konst;
return po;
}
int main()
{long long sol=0,n,k,r,c;
freopen("kperm.in","r",stdin);
scanf("%lld%lld",&n,&k);
c=n/k;
r=n%k;
if(k%2)
sol=((fact(r)*fact(c))%konst)*((power(fact(c+1),r)*power(fact(c),c-r))%konst)%konst;
freopen("kperm.out","w",stdout);
printf("%lld",sol);
fclose(stdout);
return 0;
}