Pagini recente » Cod sursa (job #906082) | Cod sursa (job #2597003) | Cod sursa (job #2509524) | Cod sursa (job #1893959) | Cod sursa (job #345855)
Cod sursa(job #345855)
Program lgput;
var f,g:text; n,p:longint;
function putere (x,y:longint):longint;
begin
if y=0 then putere:=1 else
if y=1 then putere:=x else
putere:=(sqr (putere (x,y div 2) mod 1999999973)*putere (x,y-2*(y div 2))) mod 1999999973;
end;
begin
assign (f,'lgput.in'); reset (f);
assign (g,'lgput.out'); rewrite (g);
readln (f,n,p);
writeln (g,putere (n,p));
close (f); close (g);
end.