N的3次方N个连续奇数和每个正整数N的立方都可以表示为N个连续奇数的和,用pascal语言怎么做?急.

Question

N的3次方 N个连续奇数和
每个正整数N的立方都可以表示为N个连续奇数的和,用pascal语言怎么做?
急.

Answer 1

var
n,i,a:integer;
begin
readln(n);
a:=n*n-n+1;
for i:=1 to n do
begin
writeln(a);
a:=a+2;
end;
end.