|
ゴンとも |
|
十進basicで以下でした。
FOR a=1 TO 6 FOR b=1 TO 6 IF b=a THEN GOTO 80 FOR c=1 TO 6 IF (c=a) OR (c=b) OR ((b>a) AND (b<c)) OR ((b<a) AND (b>c)) THEN GOTO 70 FOR d=1 TO 6 IF (d=a) OR (d=b) OR (d=c) OR ((c>b) and (c<d)) or ((c<b) and (c>d)) THEN GOTO 60 FOR e=1 TO 6 IF (e=a) OR (e=b) OR (e=c) OR (e=d) OR ((d>c) and (d<e)) or ((d<c) and (d>e)) THEN GOTO 50 FOR f=1 TO 6 IF (f=a) OR (f=b) OR (f=c) OR (f=d) OR (f=e) OR ((e>d) and (e<f)) or ((e<d) and (e>f)) THEN GOTO 40 PRINT a;b;c;d;e;f 40 next f 50 next e 60 next d 70 next c 80 next b 90 next a END |
|
豊川市
3月8日（木） 1:45:21
MAIL:fttnm528@ybb.ne.jp 29517 |