Файл 53-2250663.mkp (КС 13232/210)
0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |
00 | 9 | П 0 | ПП | 14 | ИП 9 | ÷ | П A | ПП | 14 | ИП 9 |
10 | F x2 | ÷ | П B | С/П | ИП 9 | F x2 | П C | K ИП 0 | ↔ | × |
20 | F Bx | F x2 | П D | + | K ИП 0 | + | ИП C | K ИП 0 | × | ИП D |
30 | + | K ИП 0 | + | ÷ | В/О | F π | 2 | ÷ | ИП A | ИП 9 |
40 | F cos | × | - | ИП B | ИП 9 | F sin | × | - | П 0 | С/П |
50 | ИП A | ИП 9 | F sin | × | ИП B | ИП 9 | F cos | БП | 46 | 0 |
60 | 0 | 0 | 0 |
Файл 53-2250663.mkl
.CHARSET 1251 ; Файл 53-2250663 .ORG 0 9 M 0 GSB A14 RM 9 / M A GSB A14 RM 9 F X^2 / M B R/S A14: ; с адреса 2 , 7 RM 9 F X^2 M C K RM 0 <-> * F ANS F X^2 M D + K RM 0 + RM C K RM 0 * RM D + K RM 0 + / RTN F PI 2 / RM A RM 9 F COS * - RM B RM 9 F SIN A46: ; с адреса 57 * - M 0 R/S RM A RM 9 F SIN * RM B RM 9 F COS GOTO A46 0000 .END