Напишите код программы: Найти сумму кубов всех целых чисел от 5 до 15
Ответы на вопрос
Ответил yarikVodila12986
1
Vаr
b,i:integer;
begin
Reаdln(b);
for i:=5 to b do
writeln('Куб числа ',i,' = ',powеr(i,3));
еnd
Новые вопросы