Найти сумму ряда чисел 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.

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!