Создание подпрограммы преобразования 128-разрядного СЧ в УЧ

Блок-схема основной программы.Линейная схема основной программы.Для написания операционной семантики была выбрана команда dec.Будем использовать одну ленту L1 и алфавит {0,1,#}.Также была изучена работа с упакованными десятичными числами.Если числа равны по длине то найти наибольшее.X, x1, x2.Старт, стоп, если.Inv {B} Inv.Проверка на длину числа.