var n: integer;
begin
for n:= 13 downto 4 do
writeln(n*n*n);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Заполни пропуски в программе. Вывод на экран кубов чисел от 13 до 4. var :integer; begin for n:= downto do writeln (n*n*n); readln; end.
var n: integer;
begin
for n:= 13 downto 4 do
writeln(n*n*n);
end.