Коллеги, помогите с алгоритмом функции, для получения значения разряда десятичного числа. Т.е. 

myinttostr(235,0) результат =5
myinttostr(235,1) результат =3
myinttostr(235,2) результат =2

Проблема в том, что допускается использовать только операторы +, -, if, goto, and, xor, or и операции сдвига.

Да, это не задача для ВУЗа - в последующем этот алгоритм будет адаптирован к ассемблеру микроконтроллера PIC16F84 – поэтому такие ограничения по операциям.

А сразу хранить числа в 10 формате  не предлогать?

Алгоритм простой
b:=a/10; делем на цело
с:=a-b*10  получаем остаток
goto к следующему разряду

деление на константу легко заменяется на умножение сдвиги и сложения.
Алгоритм лучше прочитать у Агнера Фога. Просто он у него он полностью расписан.

http://www.agner.org/optimize/optimizing_assembly.pdf

В десятичном формате работать нельзя т.к. это полностью меняет алгоритм работы всего приложения.

По поводу Агнера Фога - он использует уножение... Правда умножение можно заменить сложением... Будем посмотреть...

А есть другие соображения?

А объём дополнительной памяти? критично? 

В крайнем случае нечто типа решения "влоб":

Насчет памяти для конкретно этого приложения не критично, поэтому решение "в лоб" допустимо. Я о чем то подобном думал – такая реализация относится к категории «от отчаяния» . 

Все таки должно быт простое оригинальное решение т.к. подобная задача должна же была как то решаться на слабых процессорах в которых нет деления и умножения (например Z80, и легендарный Spectrum) 

числа 1, 10, 100, 1000, ... можно сохранить в памяти на этапе сборки
потом можно узнавать старшую цифру так:




тогда раскладывать число на цифры можно так:


если захочется немножко ускорить, можно добавить один шаг деления пополам: перед поиском цифры быстро определить больше ли она 5, дальше бисекция много ускорения не даст...

Я вообще-то эти вещи не связывал... как я понял, десятичную цифру надо выделять из байта? тогда можно подготовить 3 статических таблицы (или построить эти таблицы при старте прошивки/приложения) и находить ответ одним XLAT.

Всем спасибо за советы. Вот нашел в своих старых asm проектах и переделал на Delphi (для наглядности). Реалезация похожа на то что предложил maxim1000:




Это сообщение отредактировал(а) Matrex - 7.4.2009, 08:45