Помогите, плез, буду очень признателен.
Паскаль.
Напечатать в обратном порядке кубы целых чисел от 10 до b (значение b вводится с клавиатуры, b>10).
Значение b изменяется
От 22 до 10
Паскаль.
Напечатать в обратном порядке кубы целых чисел от 10 до b (значение b вводится с клавиатуры, b>10).
Значение b изменяется
От 22 до 10
More Questions From This User See All
Answers & Comments
Verified answer
Var b,i:integer;begin
write('b (>10) = '); readln(b);
for i:=b downto 10 do write(i*i*i,' ');
writeln;
end.
Пример:
b (>10) = 22
10648 9261 8000 6859 5832 4913 4096 3375 2744 2197 1728 1331 1000