Файл 17-1218498.mkp (КС 6268/238)
0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |
00 | ПП | 57 | С/П | ПП | 65 | С/П | ИП 9 | 2 | × | П 9 |
10 | ПП | 40 | ИП 8 | 2 | × | F sin | ИП 5 | F Bx | F cos | ИП 7 |
20 | × | + | ÷ | П 5 | ИП 6 | F Bx | ИП 7 | × | ÷ | П 6 |
30 | С/П | ПП | 65 | ПП | 83 | С/П | ПП | 57 | БП | 33 |
40 | ИП 9 | F ex | B↑ | F 1/x | + | 2 | ÷ | П 5 | ИП 9 | F ex |
50 | B↑ | F 1/x | - | 2 | ÷ | П 6 | В/О | ИП 8 | F sin | П A |
60 | ИП 8 | F cos | П B | БП | 72 | ИП 8 | F cos | П A | ИП 8 | F sin |
70 | /-/ | П B | ПП | 40 | ИП 5 | ИП A | × | П 5 | ИП 6 | ИП B |
80 | × | П 6 | В/О | ИП 5 | B↑ | F x2 | ИП 6 | F x2 | + | ÷ |
90 | П 5 | ИП 6 | F Bx | ÷ | /-/ | П 6 | В/О | 0 |
Файл 17-1218498.mkl
.CHARSET 1251 ; Файл 17-1218498 .ORG 0 GSB A57 R/S GSB A65 R/S RM 9 2 * M 9 GSB A40 RM 8 2 * F SIN RM 5 F ANS F COS RM 7 * + / M 5 RM 6 F ANS RM 7 * / M 6 R/S GSB A65 A33: ; с адреса 38 GSB A83 R/S GSB A57 GOTO A33 A40: ; с адреса 10 , 72 RM 9 F EXP ENT F 1/X + 2 / M 5 RM 9 F EXP A50: ; с адреса 1 ENT A51: ; с адреса 37 F 1/X - 2 / M 6 RTN A57: ; с адреса 0 , 36 RM 8 F SIN M A RM 8 F COS M B GOTO A72 A65: ; с адреса 3 , 31 RM 8 F COS M A RM 8 F SIN +/- M B A72: ; с адреса 63 GSB A40 RM 5 RM A * M 5 RM 6 RM B * M 6 RTN A83: ; с адреса 33 RM 5 ENT F X^2 RM 6 F X^2 + / M 5 RM 6 F ANS / +/- M 6 RTN 0 .END