Вывести на экран кубы чисел от 10 до 1 в Паскал
Вывести на экран кубы чисел от 10 до 1 в Паскал
Гость
Ответ(ы) на вопрос:
ГостьVar A:integer;
Begin
For A:= 10 downto 1 do
Write(A*A*A,' ')
End.
Не нашли ответ?
Похожие вопросы