Question

Составьте программу,  вычисления значения выражения для данного натурального  числа N: 1^3+2^3+3^3+...+N^3

+блок-схема и решение на алгоритмическом языке 

Answer 1

var N,a,i: real;
begin
readln(N);
i:=1;
a:=0;
while i<=N do begin
a:=a+power(i,3);
i:=i+1;
end;
writeln(a);
end.

Вот программа