Pagini recente » Cod sursa (job #504428) | Cod sursa (job #1566652) | Cod sursa (job #736957) | Cod sursa (job #2899524) | Cod sursa (job #174631)
Cod sursa(job #174631)
const m=1999999973;
var f:text;
n,p:longint;
function pu(n,p:longint):longint;
begin
if 0=p then pu:=1
else
if odd(p) then pu:=(n mod m*pu(n,p div 2)mod m*pu(n,p div 2) mod m)mod m
else pu:=(pu(n,p div 2) mod m*pu(n,p div 2)mod m)mod m;
end;
begin
assign(f,'lgput.in'); reset(f);
readln(f,n,p);
close(f); assign(f,'lgput.out'); rewrite(f);
writeln(f,pu(n,p));
close(f);
end.