Составить алгоритм и программу вывода на экран кубов всех целых чисел от – 5 до 12.
Var i:integer; begin for i:=-5 to 12 do writeln(i*i*i); end.