Pagini recente » Cod sursa (job #10138) | Cod sursa (job #2439450) | Cod sursa (job #1426738) | Cod sursa (job #2600829) | Cod sursa (job #1413219)
program ridicare_log;
const modulo = 1999999973;
var f,g:text;
n,p,sol:int64;
bufin,bufout:array[1..1 shl 17] of char;
begin
assign(f,'lgput.in'); reset(f);
assign(g,'lgput.out'); rewrite(g);
settextbuf(f,bufin); settextbuf(f,bufout);
readln(f,n,p);
sol := 1;
while p > 0 do
begin
if p mod 2 = 1 then sol := (sol mod modulo) * (n mod modulo);
n := (n mod modulo) * (n mod modulo);
p := p div 2;
end;
writeln(g,sol);
close(f); close(g);
end.