program ab;
var f,g:text;
    a,c,n,m,b:longint;
begin
     assign(f,'lgput.in');
     assign(g,'lgput.out');
     reset(f);
     rewrite(g);
     c:=1;
     m:=n; b:=a;
     while m<>0 do
     begin
          if m mod 2=1 then
             c:=c*b;
          b:=b*b;
          m:=m div 2;
     end;
     write(g,c);
     close(f);
     close(g);
end.