Pagini recente » Cod sursa (job #28739) | Cod sursa (job #2340024) | Cod sursa (job #3265202) | Cod sursa (job #3287120) | 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.