Найти сумму ряда чисел 1^3+2^3+3^3+...+n^3 Pascal

вот цикл который будет с помощью показателя i прибавлять к сумме всё новые и новые значения i в промежутке от 1 до n с шагом 1
begin
for i 1 to n do
s=s+i*i*i;
end.
Где s- переменная, обозначающая сумму( изначально равна 0)