помогите пожалуйста . Дано целое число N(>0). Сформировать и вывести целочисленный массив размера N, содержащий степени двойки от первой до N-й:2,4,8,16.....

Сделал через динамический массив и без модуля Mathvar i,n:integer;    a:array of real;begin  Readln(n);  SetLength(a,n);  for i:=0 to Length(a) do   a[i]:=Exp(Ln(2)*i);  for i:=0 to Length(a) do   writeln('2^',i,' = ',a[i]);  Readln;end.