Сообщение от Reks888
Код Максима кстати можно немного укоротить:
Function GetDigit$(val%,pos%)
Return Mid(val%,pos%,1)
End Function
|
Хм... И что это даст? Одну из цифр в числе. Но тогда сначала надо выяснить, сколько в числе цифр, потом где-то хранить все их. А если это реализовывать, то получится такое же говно, что и я написал