Помогите, плез, буду очень признателен. Паскаль. Напечатать в обратном порядке ?
Помогите, плез, буду очень признателен.
Паскаль.
Напечатать в обратном порядке ??убы целых чисел от 10 до b (значение b вводится с клавиатуры, b>10).
Значение b изменяется
От 22 до 10
Гость
Ответ(ы) на вопрос:
Гость 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
Не нашли ответ?
Похожие вопросы