37 39 F8 stop ; Стоп

38 3a 00 A: .ds 1 ; ячейка памяти для A

39 3b 00 B: .ds 1 ; ячейка памяти для B

40 3c 00 N: .ds 1 ; ячейка памяти для N

41 3d 00 I: .ds 1 ; ячейка памяти для I

42 3e 00 Y: .ds 1 ; ячейка памяти для Y

3) For (с счетчиком).

1 00 40 In 0 ; Ввод a

2 01 18 2e stor a,A ; Запоминание значение регистра А по символическому адресу A

4 03 0a mov b,a ; Копировали значение регистра В в А

5 04 41 in 1 ; Ввод В

6 05 18 2f stor a,B ; Запоминание значение регистра А по символическому адресу В

8 07 51 adr a,b ; Сложили регистры

9 08 18 31 stor a,Y ; Запомнили результат сложения по символическому адресу Y

10 0a 42 in 2 ; Ввод N

11 0b 18 30 stor a,N ; Запоминание значение регистра А по символическому адресу N

12 0d b0 01 cmi a,1 ; Сравниваем значение переменной N с 1

13 0f ba 2a jz exit ; Переход на метку exit если N=1

14 11 78 01 sbi a,1 ; Вычитаем из значения регистра А 1

15 13 20 cikl: push a ; Загружаем в стек

16 14 11 2e load b,A ; Загрузка значения ячейки памяти А в регистр

17 16 90 01 mui a,1 ; Умножение регистра В на I

18 18 19 2e stor b,A ; Загрузка значения регистра В в ячейку памяти с адресом А

19 1a 11 2f load b,B ; Загрузка значения ячейки памяти В в регистр

20 1c a0 01 dvi a,1 ;Деление регистра В на I

21 1e 19 2f stor b,B ; Загрузка значения регистра В в ячейку памяти с адресом В

22 20 10 2e load a,A ; Загрузка в регистр А значение ячейки памяти А

23 22 51 adr a,b ; Сложение регистров

24 23 58 31 adm a,Y ; Сложение результата предыдущего действия с значением памяти с символическим ;адресом Y

26 25 18 31 stor a,Y ; Загрузка результата в ячейку памяти с символическим адресом Y

27 27 28 pop a ; Выгружаем из стека количество оставшихся степеней

28 28 e0 13 loop a,cikl ; Уменьшаем степень на 1 если результат не равен 0 переходим по метке

29 2a 10 31 exit: load a,Y; Загрузка значения ячейки памяти Y в регистр A

30 2c 4b out 3 ; Вывод результата в канал 3

31 2d f8 stop ; Стоп

32 2e 00 A: .ds 1 ; ячейка памяти для A

33 2f 00 B: .ds 1 ; ячейка памяти для B

34 30 00 N: .ds 1 ; ячейка памяти для N

35 31 00 Y: .ds 1 ; ячейка памяти для Y