program dlb;
var
i,n : integer;
a,y : real;
begin
readln(a,n);
y:= 1;
for i := 1 to n do
y := y * a;
writeln(y);
end.
