35 БАЛЛОВ ДАЮ!!РЕШИТЕ ПОЖАЛУЙСТА КАК ПРОХОДЯТ В 9 КЛАССЕ!!!!Вывести квадраты

На каком языке?

1. Ряд строится по принципу золотого сечения. Формула для вычисления члена последовательности такая:
x(2)=x(1)+1,
x(3)=x(2)+2,
...
x(n)=x(n-1)+n-1

В нашем методе для вычисления последующего члена последовательности будем запоминать текущий член последовательности в переменной kp.
Затем получаем очередной член последовательности суммируя kp и переменную цикла i - 1. Делаем вычисления, выводим на экран и переписываем переменную kp  новым значением.
 
var i,k,kp:integer;
begin
kp:=1;
for i:=1 to 10 do begin
  k:=kp+i-1;
  kp:=k;
  writeln(k:5, k*k:6, k*k*k:8);
  end;
end.

Pascal

var i, j:integer;
begin
j:=1;
i:=1;
while jlt;=10 do
begin
writeln(i,' ',i*i,' ',i*i*i);
i:=i+j;
j:=j+1;
end;
end.