Помогите составить программу в паскале вычисления суммы кубов чисел от 25 до 1255 (тему циклы мы только что прошли)

Question

Ара

10 июня, 00:50

+2

Ответы (1)

Знаете ответ на вопрос?

Венцеслава · Answer 1

Var i:integer; s:real;

begin

s:=0;

for i:=25 to 1255 do

begin

s:=s+power (i, 3) ;

end;

writeln (s) ;

end.