10 '17NZ^[wIA
100 INPUT "N=";N
110 IF N>9 THEN GOTO 230
120 FOR A=1 TO N
130   FOR B=1 TO N
140    IF B=2*INT(B/2) THEN GOTO 210
150    IF B=A THEN GOTO 210
160     FOR C=1 TO N
170      IF C=A THEN GOTO 200
180      IF C=B THEN GOTO 200
190      PRINT A*100+B*10+C
200     NEXT C
210   NEXT B
220 NEXT A
230 END
