ПОМОГИТЕ ПЛИЗ!!!)
Составьте программу для нахождения наименьшего натурального числа, куб которого начинается с цифр 2016
Выходные данные 1out : 3
27

2722 20168071048

Первое - число, второе - куб.

Входных данных тут нету, только выходные.

Спасибо огромное :)))

Пожалуйста.

ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";ПЕР  число, куб: ШИРЦЕЛ;УКАЗ  число := 1;  КОЛЬЦО    УВЕЛИЧИТЬ(число);    куб := число * число * число;    ПОКА куб > 10000 ВЫП      куб := куб ДЕЛИТЬ 10    КОН;    ЕСЛИ куб = 2016 ТО      Вывод.ЧЦел("%d", число, 0, 0, 0);      ВЫХОД    КОН  КОНКОН Задание.