Выделение разрядов числа без использования округления и деления по модулю

Первый параметр функции - число из максимум пяти разрядов цифр "0" и "1", второй параметр - номер разряда. Функция, возвращающая значение разряда:

Функция Ф(Х, У)
    Возврат ?(У < 2, 0 + (Х > 9999), Ф((Х - 10000 * (Х > 9999)) * 10, У - 1))
КонецФункции

Функция Ф(Х, У)
    Возврат ?(У < 2, 0 + (Х > 9999), Ф((Х - 10000 * (Х > 9999)) * 10, У - 1))
КонецФункции