Найти сумму кубов всех целых чисел от 5 до b

Ответ

Автор - simbion0

Var
b,i:integer;
begin
Readln(b);
for i:=5 to b do
writeln('Куб числа ',i,' = ',power(i,3));
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.