Cod sursa(job #29830)
#include <stdio.h>
#define MAX_N 5005
#define MOD 666013
#define FIN "kperm.in"
#define FOUT "kperm.out"
#define ll long long
int N, K, fact[MAX_N], Res;
int main(void)
{
int i;
freopen(FIN, "r", stdin);
freopen(FOUT, "w", stdout);
scanf("%d %d", &N, &K);
if (!(K&1)) { printf("0\n"); return 0; }
fact[0] = 1;
for (i = 1; i <= N; i++)
fact[i] = ((ll)fact[i-1]*i) % MOD;
Res = ((ll)fact[N%K]*fact[K-(N%K)]) % MOD;
for (i = 0; i < N%K; i++)
Res = ((ll)Res*fact[N/K+1]) % MOD;
for (i = 0; i < K-(N%K); i++)
Res = ((ll)Res*fact[N/K]) % MOD;
printf("%d\n", Res);
return 0;
}