Файл 02-1018298.mkp (КС 3708/232)
0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |
00 | П 8 | 1 | 0 | - | F x≥0 | 35 | П 6 | 1 | 9 | × |
10 | 3 | 2 | 4 | + | П 1 | ИП 6 | 5 | × | 8 | 0 |
20 | + | П 7 | П 4 | 1 | 3 | × | ИП 1 | 3 | , | 7 |
30 | 5 | × | + | П 0 | С/П | 4 | + | F x≥0 | 55 | П 6 |
40 | 1 | 8 | × | 2 | 5 | 2 | + | П 1 | ИП 6 | 2 |
50 | × | 7 | 2 | БП | 20 | 4 | + | П 6 | F x≥0 | 85 |
60 | 2 | 0 | × | 1 | 9 | 2 | + | П 1 | ИП 6 | 2 |
70 | - | F x≥0 | 78 | 1 | 0 | × | - | П 1 | ИП 6 | 5 |
80 | × | 5 | 3 | БП | 20 | 6 | 0 | × | 1 | 9 |
90 | 2 | + | П 1 | ИП 6 | 2 | × | БП | 79 |
Файл 02-1018298.mkl
.CHARSET 1251 ; Файл 02-1018298 .ORG 0 M 8 10 - F X>=0 A35 M 6 19 * 324 + M 1 RM 6 5 * 80 A20: ; с адреса 53 , 83 + M 7 M 4 13 * RM 1 3,75 * + M 0 R/S A35: ; с адреса 4 4 + F X>=0 A55 M 6 18 * 252 + M 1 RM 6 2 * 72 GOTO A20 A55: ; с адреса 37 4 + M 6 F X>=0 A85 20 * 192 + M 1 RM 6 2 - F X>=0 A78 10 * - M 1 A78: ; с адреса 71 RM 6 A79: ; с адреса 96 5 * 53 GOTO A20 A85: ; с адреса 58 60 * 192 + M 1 RM 6 2 * GOTO A79 .END