Cod sursa(job #410792)

Utilizator ivanhoeNociv Hasis ivanhoe Data 4 martie 2010 16:33:33
Problema Ridicare la putere in timp logaritmic Scor 10
Compilator fpc Status done
Runda Arhiva educationala Marime 0.2 kb
var
 n,p:longint;
 f,g:text;
begin
 assign(f,'lgput.in');
 reset(f);
 readln(f,n,p);
 close(f);
 assign(g,'lgput.out');
 rewrite(g);
 writeln(g,(exp(p*ln(n))):0:0 mod 1999999973);
 close(g);
end.