Pagini recente » Cod sursa (job #1906116) | Cod sursa (job #2903178) | Cod sursa (job #2007823) | Cod sursa (job #2904439) | Cod sursa (job #1115565)
const modulo=1999999973;
var n,p,rs:longint;
begin
assign(input,'lgput.in');
assign(output,'lgput.out');
reset(input);
rewrite(output);
read(n); readln(p);
while p>0 do
begin
if p mod 2=0 then begin n:=(n*n) mod modulo; p:=p div 2; end
else begin rs:=(rs*n) mod modulo; dec(p); end;
end;
writeln(rs);
close(input);
close(output);
{Totusi este trist in lume}
end.