Pagini recente » Cod sursa (job #1399957) | Cod sursa (job #319578) | Cod sursa (job #3162096) | Cod sursa (job #1392898) | Cod sursa (job #330654)
Cod sursa(job #330654)
var n,p,rez,r2:int64;
f,g:text;
function putere(x,y:int64):int64;
var a:int64;
begin
if y=0 then
putere:=1
else
if y mod 2=1 then
putere:=putere(x,y-1)*x
else
begin
a:=putere(x,y div 2);
putere:=a*a;
end;
end;
begin
assign(f,'lgput.in');
assign(g,'lgput.out');
reset(f);rewrite(g);
read(f,n,p);
rez:=putere(n,p);
write(g,rez mod 1999999973);
close(f);close(g);
end.