Cod sursa(job #505282)

Utilizator vendettaSalajan Razvan vendetta Data 1 decembrie 2010 13:32:53
Problema Ridicare la putere in timp logaritmic Scor 0
Compilator fpc Status done
Runda Arhiva educationala Marime 0.27 kb
Raporteaza aceasta sursa 
uses math;
var
    f,g:text;
    p,n,x:longint;
    buf:array[1..1 shl 17] of char;
begin
    assign(f,'lgput.in');reset(f);
    assign(g,'lgput.out');rewrite(g);
    settextbuf(f,buf);
    readln(f,n,p);
    x:=trunc(power(n,p));
    write(g,x);
    close(f);close(g);