Pagini recente » Cod sursa (job #3263900) | Cod sursa (job #2708807) | Cod sursa (job #2629807) | Cod sursa (job #1370576) | Cod sursa (job #1200894)
var x,y: int64;
i,j:longint;
fi,fo: text;
function putere(x,y:longint):longint;
var p,i:longint;
begin
if y=0 then begin
putere:=1;exit;
end;
p:=x;
i:=1;
while (i*2<=y) do begin
p:=p*p mod 1999999973;
i:=i*2;
end;
p:=p*putere(x,y-i) mod 1999999973;
putere:=p;
end;
begin
assign(fi,'lgput.in');
assign(fo,'lgput.out');
reset(fi);
rewrite(fo);
readln(fi,x,y);
writeln(fo,putere(x,y)mod 1999999973);
close(fo);
close(fi);
end.