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

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

Информатика (24 баллов) | 30 просмотров
Дан 1 ответ
0 голосов

Var i:integer;s:real;
begin
s:=0;
for i:=25 to 1255 do
begin
s:=s+power(i,3);
end;
writeln (s);
end.