Файл 05-1047635.mkp (КС 18660/160)
0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |
00 | ИП 7 | ИП 5 | × | ИП 4 | ИП 8 | × | - | П 3 | F x≠0 | 30 |
10 | ИП 5 | ИП 9 | × | ИП 8 | ИП 6 | × | - | ИП 3 | ÷ | П 1 |
20 | ИП 9 | ИП 7 | ИП 1 | × | - | ИП 8 | ÷ | П 2 | БП | 31 |
30 | F 1/x | С/П | 0 | 0 | 0 |
Файл 05-1047635.mkl
.CHARSET 1251 ; Файл 05-1047635 .ORG 0 RM 7 RM 5 * RM 4 RM 8 * - M 3 F X!=0 A30 RM 5 RM 9 * RM 8 RM 6 * - RM 3 / M 1 RM 9 RM 7 RM 1 * - RM 8 / M 2 GOTO A31 A30: ; с адреса 8 F 1/X A31: ; с адреса 28 R/S 000 .END