Машина Тьюринга на паскале
 

Здравствуйте передо мной стала непростая задача.

Построить систему команд машины Тьюринга, реализующей следующие действия:
На входной ленте заданы два числа в унарном коде. Получить на ленте число в двоичной системе счисления, равное произведению первого числа на второе.

Эту задачу необходимо реализовать на паскале. На экране вывода должно выводиться что-то типа ленты и программа должна по нажатию кнопки выполнять каждый шаг работы машины Тьюринга.

Я построил 2 машины. Одна умножает унарные числа, другая переводит результат в двоичный код. Вот скрины таблицы команд.
Вложение 181595Вложение 181596
Машины реализованы в это программе Вложение 181598
Также прилагаю архив с проектами этих машин для вышеупомянутой программы.
Как все это перенести в паскаль ума не приложу. Выручите плиз. Заранее спасибо.