Написать на паскале программу. задано натуральное n. вычислить сумму ряда: 1^3 + 2^3 + 3^3 +. . + n^3 значение n вводится с клавиатуры.

// PascalABC.NET 3.2, сборка 1483 от 14.06.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n =');
  Writeln('S = ',SeqGen(n,i->Power(i+1,3)).Sum)
end.

Пример
n = 18
S = 29241

Var
   N:integer;
   S:real;
Begin
Write('N = ');
ReadLn(N);
S:=0;
For N:= 1 to N do
    S:=S+N*N*N;
WriteLn('S = ',S);
End.