Найти сумму ряда чисел 1^3+2^3+3^3+...+n^3 Pascal
Найти сумму ряда чисел 1^3+2^3+3^3+...+n^3
Pascal
Ответ(ы) на вопрос:
begin
var n,i:integer;
var sum:real;
begin
sum:=0;
writeln('Введите n: ');
readln(n);
for i:=1 to n do
sum:=sum+Power(i,3);
writeln('Ответ:'+sum);
end;
end.
Не нашли ответ?
Похожие вопросы