Программа 8 Ферзей для DM42/Free42

00 { 67-Byte Prgm }    22 X=0?
01▸LBL "NQUEENS"       23 GTO 00
02 CLRG                24 RCL IND 00
03 8                   25 RCL IND 09
04 STO 11              26 -
05▸LBL 00              27 X=0?
06 RCL 00              28 GTO 03
07 RCL 11              29 ABS
08 X=Y?                30 RCL 00
09 GTO 04              31 RCL 09
10 ISG 00              32 -
11 DEG                 33 X≠Y?
12 STO IND 00          34 GTO 02
13▸LBL 01              35▸LBL 03
14 ISG 10              36 DSE IND 00
15 DEG                 37 GTO 01
16 RCL 00              38 DSE 00
17 STO 09              39 GTO 03
18▸LBL 02              40▸LBL 04
19 DSE 09              41 RCL 10
20 DEG                 42 RTN
21 RCL 09              43 END

RCL 01 = 8, ..02 = 4, ..03 = 1, ..04 = 3, ..05 = 6, ..06 = 2, ..07 = 7, ..08 = 5