program p1;
var x,p:real;
    n:int64;
    i,j,u:longint;
    f,g:text;
begin
assign(f,'lgput.in');reset(F);
assign(g,'lgput.out');rewrite(G);
readln(f,x,n);
p:=1;
while n>0 do
        if n mod 2 <>0 then begin
                 p:=p*x;
                 n:=n-1;
                 end
                 else begin
                 x:=x*x;
                 n:=n div 2;
                        end;
writeln(g,p:0:0);
close(F);
close(G);
end.