Файл 14-1140042.mkp (КС 17329/251)

  0 1 2 3 4 5 6 7 8 9
00 Cx П 5 П 1 П 0 ИП 5 С/П П 8 ИП 1 + П 1
10 K ИП 5 ИП 8 F x2 ИП 0 + БП 03 ИП 1 ИП 5 ÷
20 П 1 ИП 0 ИП 5 ÷ ИП 1 F x2 - П 0 ИП 5 ÷
30 F √ ИП 9 × - П 7 ИП 1 F Bx + П 4 С/П
40 0 0                

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

Файл 14-1140042.mkl

.CHARSET 1251
; Файл 14-1140042 
.ORG 0 
	CX
	M 5
	M 1

A3:	 ; с адреса 15 
	M 0
	RM 5
	R/S
	M 8
	RM 1
	+
	M 1
	K RM 5
	RM 8
	F X^2
	RM 0
	+
	GOTO A3
	RM 1
	RM 5
	/
	M 1
	RM 0
	RM 5
	/
	RM 1
	F X^2
	-
	M 0
	RM 5
	/
	F SQRT
	RM 9
	*
	-
	M 7
	RM 1
	F ANS
	+
	M 4
	R/S
	00
.END