Преобразовать целое без знака в его восьмеричное символьное представление - QBasic

Формулировка задачи:

Салют форумчани!!! Объясните мне пожалуйста, что тут от меня хотят?? Написать и протестировать функцию, которая преобразует целое без знака в его восьмеричное символьное представление (библиотечные функции для преобразования числа в строку и формат вывода "%o" не использовать). Мне кажется, что это задача для C++, но никак не для QBasic... Воообще нет никакой мысли, связаной с её решением(( Помогите, кто может.

Решение задачи: «Преобразовать целое без знака в его восьмеричное символьное представление»

Листинг программы

DECLARE FUNCTION prog$ (z, u$)
u$ = "01234567"
CLS
INPUT "vvedite chislo"; z
PRINT prog$(z, u$)
 
FUNCTION prog$ (z, u$)
DO
    c$ = MID$(u$, (z MOD 8) + 1, 1) + c$
    z = z \ 8
LOOP UNTIL z = 0
prog$ = c$
END FUNCTION

Объяснение кода листинга программы

В этом коде представлена функция с именем prog$, которая принимает два аргумента: z и u$. Значение переменной z является целым числом без знака, а значение переменной u$ - строкой, представляющей собой восьмеричное число. Внутри функции происходит следующая последовательность действий:

Переменная u$ присваивается значение 01234567.
CLS очищает экран.
Пользователю предлагается ввести целое число.
Значение переменной z присваивается введенному пользователем числу.
Вызывается функция prog$ с аргументами z и u$.
Результат работы функции выводится на экран. Внутри функции prog$ выполняется цикл DO-LOOP, который продолжается до тех пор, пока значение переменной z не станет равным нулю. Внутри цикла выполняется следующее действие:
С помощью функции MID$ из переменной u$ берется один символ, начиная с позиции, равной (z MOD 8) + 1.
К полученному символу добавляется значение переменной c$.
Значение переменной z делится на 8. После окончания цикла DO-LOOP значение переменной c$ присваивается переменной prog$. Таким образом, функция prog$ преобразует целое без знака в его восьмеричное символьное представление.