Для натуральных чисел a и n вычислить an.
Ограничения: 1 <= a <= 9, 1 <= n <= 7000.
Ввод: В первой строке находятся разделённые пробелом a и n.
Вывод: Выводится одно число - результат без стоящих впереди нулей, стоящих впереди и позади пробелов.

Примеры

Ввод 1       Ввод 2
3 20         5 50
Вывод 1      Вывод 2
3486784401   88817841970012523233890533447265625

Код:
var b:array[1..1000000]of byte;x,n,m,i,j,p,l:longint;

begin
  readln(x,m);
  for i:=1 to 1000000 do b[i]:=0;
  b[1]:=1;n:=1;
  for j:=1 to m do
  begin
    l:=0;
    for i:=1 to n do
    begin
      p:=b[i]*x+l;
      l:=p div 10;
      b[i]:=p mod 10;
    end;
    if l>0 then begin inc(n);b[n]:=l;end;
  end;
  for i:=n downto 1 do write(b[i]);
end.