Задание Паскаль. Обязательно циелический алгоритм. Вывести на экран кубы чисел от A до B. Где А - 1, а где В - 10​

var

 i:Integer;

begin

 for i := 1 to 10 do writeln(i*i*i)

end.