Pagini recente » Cod sursa (job #2589472) | Diferente pentru problema/siret intre reviziile 2 si 1 | Diferente pentru problema/patrol2 intre reviziile 33 si 19 | Monitorul de evaluare | Cod sursa (job #1052581)
program putere_timp_logaritmic;
const rest=1999999973;
var n,p,rez:int64;
f:text;
begin
assign(f,'lgput.in');
reset(f);
readln(f,n,p);
rez:=1;
while p>0 do begin
if p mod 2=1 then rez:=(rez*n) mod rest;
n:=sqr(n) mod rest;
p:=p div 2;
end;
assign(f,'lgput.out');
rewrite(f);
writeln(f,rez);
close(f);
end.