.CHARSET 1251 ; Ôàéë 3-42 .ORG 0 A0: ; ñ àäðåñà 14 , 37 , 48 , 59 , 79 M D K GOTO D RM 5 RM 6 F COS * RM 5 RM 6 F SIN * M 6 <-> M 5 R/S GOTO A0 RM 8 F X^2 RM 9 F X^2 + F SQRT M 7 RM 8 RM 7 / F ARCCOS M C RM 9 F X<0 A34 RM C +/- M C A34: ; ñ àäðåñà 29 RM C RM 7 R/S GOTO A0 RM 9 RM 6 + M 9 RM 8 RM 5 + M 8 R/S GOTO A0 RM 9 RM 6 - M 9 RM 8 RM 5 - M 8 R/S GOTO A0 A61: ; ñ àäðåñà 96 RM 8 RM 5 * RM 9 RM 6 * - RM 8 RM 6 * RM 9 RM 5 * + M 9 <-> M 8 R/S GOTO A0 RM 5 F X^2 RM 6 F X^2 + M B RM 6 +/- RM B / M 6 RM 5 RM B / M 5 GOTO A61 .END