1. Объявите переменную `n` типа `integer`.
2. Используйте цикл `for` с переменной `n`, идущей от 14 до 3.
3. Внутри цикла выведите куб числа `n`.
var n:integer; begin for n:= 14 downto 3 do writeln (n*n*n); readln; end.