Prog.codProg.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)
|
