取余运算-ssl 1422

题意：

输入b,p,k的值，求b^p mod k 的值。

分析：

运用分治算法，依次以这些数为指数的自然数除以K的余数。

var a,b,c,d:int64;
begin
        read(a,b,c);
        write(a,'^',b,' mod ',c,'=');
        a:=a mod c;
        d:=1;
        while(b<>0)do
        begin
                if(b mod 2=1)then d:=d*a mod c;
                b:=b div 2;
                a:=(a*a)mod c;
        end;
        write(d);
end.