Файл 51-2334698.mkp (КС 6255/89)
0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |
00 | K |x| | /-/ | 1 | 5 | 0 | /-/ | K max | /-/ | П 8 | 2 |
10 | П 2 | ИП D | F x≠0 | 72 | ИП 8 | ИП 6 | × | П 1 | - | F x≥0 |
20 | 76 | П D | ИП 9 | ИП 6 | × | ИП A | П 4 | + | ИП C | × |
30 | ИП 1 | ИП 7 | × | - | ИП C | ИП 1 | - | П C | ÷ | П A |
40 | ИП 4 | ИП 6 | × | ИП 4 | ИП A | - | ÷ | П 3 | F x≥0 | 54 |
50 | ИП 6 | - | F x≥0 | 84 | ИП B | ИП A | ИП 4 | + | 2 | ÷ |
60 | ИП 6 | × | - | F x≥0 | 93 | П B | С/П | F L2 | 00 | 1 |
70 | 0 | П 6 | 0 | П 8 | БП | 14 | ИП D | ИП 8 | ÷ | П 6 |
80 | 1 | П 2 | БП | 11 | ИП B | ИП 6 | ИП 3 | × | 2 | × |
90 | - | F x<0 | 54 | 9 | ÷ | П B | 0 | F 1/x |
Файл 51-2334698.mkl
.CHARSET 1251 ; Файл 51-2334698 .ORG 0 A0: ; с адреса 67 K ABS +/-150+/- K MAX +/- M 8 2 M 2 A11: ; с адреса 82 RM D F X!=0 A72 A14: ; с адреса 74 RM 8 RM 6 * M 1 - F X>=0 A76 M D RM 9 RM 6 * RM A M 4 + RM C * RM 1 RM 7 * - RM C RM 1 - M C / M A RM 4 RM 6 * RM 4 RM A - / M 3 F X>=0 A54 RM 6 - F X>=0 A84 A54: ; с адреса 48 , 91 RM B RM A RM 4 + 2 / RM 6 * - F X>=0 A93 M B R/S F L2 A0 10 M 6 A72: ; с адреса 12 0 M 8 GOTO A14 A76: ; с адреса 19 RM D RM 8 / M 6 1 M 2 GOTO A11 A84: ; с адреса 52 RM B RM 6 RM 3 * 2 * - F X<0 A54 A93: ; с адреса 63 9 / M B 0 F 1/X .END