[Zeonic]

Волшебство математики

number% - число
digit% - позиция цифры с конца

Function GetDigit%(number%, digit%)
   Return Floor(number / (10 ^ (digit - 1)) Mod 10)
End Function

Print GetDigit(76589, 4) ;Печатает "6"