Pagini recente » Cod sursa (job #1923994) | Cod sursa (job #3038593) | Cod sursa (job #2588067) | Cod sursa (job #3038582) | Cod sursa (job #1412361)
program exprap_pregatire_oni;
var f,g:text;
n,sol,p:longint;
const modulo=1999999973;
begin
assign(f,'exprap.in'); reset(f);
assign(g,'exprap.out'); rewrite(g);
readln(f,n,p);
n:=n mod modulo;
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 mod modulo);
close(f);
close(g);
end.