Prog.cod

Prog.cod

 

00002000 060 константа "2"

00000136 061 косвен.адр.команды 136

00000134 062 - АДР.ЗАГРУЗКИ ПРОГР. и косвен.адр.команды 134

00000014 063 - константа сдвига (12 в 10 с\с)

00000120 064 - косвенный адрес команды 120

00000001 065 - константа "1"

00000126 066 - косвенный адрес команды 126

00000123 067 - косвенный адрес команды 123

00000000 070 - константа "0"

10000101 071 - псевдокоманда 134

00000134 072 - косвенный адрес команды 134

00000116 073 - косвенный адрес ПП ДЕЛ

00000111 074 - косвенный адрес ПП УМН

07000020 075 - АДР.ПУСКА ПРОГР. и команда ввода исх.данных

05021101 076 – R1:=(021)->B

05023102 077 – R2:=(023)->D

16474200 100 – R1:=R1*R2

01020101 101 – R1:=R1+(20)->A

02022101 102 - R1:=R1-(22)->C

05060102 103 – R2:=(060)->2.0

16474200 104 - R1:=R1*R2

05023102 105 – R2:=(023)->D

01060102 106 – R2:=R2+(060)->2.0

16473200 107 - R1:=R1/R2

16461000 108 - Безусл. переход на 136

03102101 111 - ПП УМН. R1,R2:= R1 * R2

10211102 112 - лог.сдв.вправо R2 на 11(9) разрядов

10115101 113 - ариф.сдв.влево R1 на 15(13) разрядов

11102101 114 - R1:= R1 лог.слож. R2

16200000 115 - возврат из ПП УМН

05071472 116 - ПП ДЕЛ. Восстан.исх.сост. команды 134

05070103 117 - R3(счетчик сдвигов L):= 0

05101300 120 - АК:= делимое

13102300 121 - АК:= делимое - делитель

06467466 122 - усл.переход на 123 по >=0 и на 126 по <0

10101102 123 - ариф.сдв.влево R2 на 1 разряд

01065103 124 - L(R3):= L + 1

16464000 125 - Безусл. переход на 120 (продолж.сдвигов)

04102101 126 - R1 (R2): = R1 / R2

05063300 127 - АК:= 14(12) - нач.знач. константы сдвигов

02103300 130 - АК:= 14 - L

05300103 131 - R3:= AK

10311103 132 - сдв.влево R3 на 11(9) разр.-на место АДР1

11103462 133 - занесение в ком.134 числа сдвигов

10000101 134 - ариф.сдв.вправо частного (R1)

16200000 135 - возврат из ПП ДЕЛ

17101000 136 - Печать результата - R1

00000000 137 - Останов программы

17777777 140 - Конец программного файла (prog.cod)