Файл 08-1064442.mkp (КС 17179/201)

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

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

Файл 08-1064442.mkl

.CHARSET 1251
; Файл 08-1064442 
.ORG 0 
	CX
	M 5
	M 4

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