unsigned Montgomery(unsigned a,unsigned b,unsigned m)
{
     unsigned k=1;
     a%=m;
     while(b)
     {
        if(b&1)
	    k=(k*a)%m;
        a=(a*a)%m;
         b>>=1;
    }
    return k;
}