Составить числовой ряд из 10 элементов так,чтобы каждое последующее число являлось квадратом предыдущего решить на паскале

PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
Внимание! Если программа не работает, обновите версию!

begin
  var j:biginteger:=2;
  var i:BigInteger;
  Writeln(j);
  loop 9 do begin
    i:=j; j*=i; Println(j)
    end
end.