/comment Програма за пресмятане на n-тото число на Fibonacci
/comment Числото n е записано в клетка с адрес 0
/comment Резултатът се записва в клетка с адрес 1
/comment Помощни клетки:
/comment Адрес 2: предишното число на Fibonacci
/comment Адрес 3: брояч, който се инкрементира до n
/comment Обхват: [0, 3]
/comment Брой инструкции: 11
/comment Нулиране на помощните клетки
ZERO 1
ZERO 2
ZERO 3
/comment Зареждане на подпрограма за добавяне на числа
/add add.urm
/comment Добавяне на оператор за връщане в главната програма
/comment при приключване на работа на подпрограмата
/quote JUMP 8
/comment Ако n = 0, край
/comment ПРОМЯНА: 17 -> 18
JUMP 0 3 18
/comment Инициализация на числото на Fibonacci с номер 1 на 1 в клетка с адрес 1
INC 1
/comment Инициализация на брояча с 1
INC 3
/comment Ако n (записано на адрес 0) съвпада с брояча (на адрес 1), край
/comment ПРОМЯНА: 17 -> 18
JUMP 0 3 18
/comment Събиране на последните две числа на Fibonacci
/comment Подготовка на входа на подпрограмата add.urm
/comment ПРОМЯНА: 1 2 4 -> 1 4 2
/copy 1 4 2
/comment Извикване на подпрограмата
JUMP 11
/comment Връщане от подпрограмата на инструкция с номер 8
/comment Запазване на текущото число на Fibonacci на адрес 1 като предишно на адрес 2
MOVE 1 2
/comment Копиране на новото число на Fibonacci, сметнато от подпрограмата, на адрес 1
/copy 6 1 1
/comment Увеличаване на брояча
/comment ПРОМЯНА: 2 -> 3
INC 3
/comment Връщане в началото на цикъла
/comment ПРОМЯНА: 3 -> 6
JUMP 6