Cod sursa(job #713220)

Utilizator misinoonisim necula misino Data 14 martie 2012 12:58:29
Problema Kperm Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.48 kb
#include<fstream>
using namespace std;
ifstream f("kperm.in");
ofstream g("kperm.out");
long long p,r,i,l,k,n,rest;
int main()
{f>>n>>k;
rest=n%k;
p=n/k;
r=1;
for(i=1;i<=rest;++i)
	r=(r*i)%666013;
l=1;
for(i=1;i<=p+1;i++)
	l=(l*i)%666013;
for(i=1;i<=rest;i++)
	r=(r*l)%666013;
for(i=1;i<=k-rest;i++)
	r=(r*i)%666013;
l=1;
for(i=1;i<=p;i++)
	l=(l*i)%666013;
for (i=1;i<=k-rest;i++)
	r=(r*l)%666013;
if(k%2==0)
	r=0 ;
g<<r<<'\n';
f.close();
g.close();
return 0;
}