Файл 26-1345863.mkp (КС 12875/247)

  0 1 2 3 4 5 6 7 8 9
00 ИП 8 П 6 ПП 51 П 5 2 ÷ ИП 6 + П 6
10 ИП 9 2 ÷ П 2 ИП 7 + П 7 ПП 51 П 4
20 2 ÷ ИП 8 + П 6 ПП 51 П 3 ИП 8 +
30 П 6 ИП 7 ИП 2 + П 7 ПП 51 ИП 5 + ИП 4
40 ИП 3 + 2 × + 6 ÷ ИП 8 + П 8
50 С/П ИП 6 F √ ИП 7 × ИП 9 × В/О 0 0
60 0 0 0              

Исходный текст для кросс-компилятора

Файл 26-1345863.mkl

.CHARSET 1251
; Файл 26-1345863 
.ORG 0 
	RM 8
	M 6
	GSB A51
	M 5
	2
	/
	RM 6
	+
	M 6
	RM 9
	2
	/
	M 2
	RM 7
	+
	M 7
	GSB A51
	M 4
	2
	/
	RM 8
	+
	M 6
	GSB A51
	M 3
	RM 8
	+
	M 6
	RM 7
	RM 2
	+
	M 7
	GSB A51
	RM 5
	+
	RM 4
	RM 3
	+
	2

A43:	 ; с адреса 26 
	*

A44:	 ; с адреса 18 
	+

A45:	 ; с адреса 3 
	6
	/
	RM 8
	+
	M 8
	R/S

A51:	 ; с адреса 2 , 17 , 25 , 35 
	RM 6
	F SQRT
	RM 7
	*
	RM 9
	*
	RTN
	00000
.END