.CHARSET 1251 ; Ôàéë 4-75 .ORG 0 1 M C A2: ; ñ àäðåñà 18 K RM C RM C * RM C 1 - M C <-> K M C RM C 2 + M C RM D <-> - F X<0 A2 A20: ; ñ àäðåñà 40 F R RM D 1 - M C <-> R/S ENT K RM C RM C A30: ; ñ àäðåñà 38 1 - M C F R * K RM C + RM C F X=0 A30 GOTO A20 .END