Question

Нужна срочно помощь решить информатику

Answer 1

1) var
 i,n:longint;
 a:array [1..1000] of longint;
begin
 readln(n);
 for i:=1 to n do
  begin
   a[i]:=sqr(2*i+1);
   write(a[i],' ');
  end;
end.

2) Условие мне не понятно
3)Ща будет