過去ログ

ゴンとも
今回は見てすぐにプログラムでできました。
十進BASICです。赤,青,緑をそれぞれ1,2,3として
127通りを列挙します。

FOR a=1 TO 3
FOR b=1 TO 3
IF 10*a+b=13 OR 10*a+b=23 THEN GOTO 50
FOR c=1 TO 3
IF 10*b+c=13 OR 10*b+c=23 THEN GOTO 40
FOR d=1 TO 3
IF 10*c+d=13 OR 10*c+d=23 THEN GOTO 30
FOR e=1 TO 3
IF 10*d+e=13 OR 10*d+e=23 THEN GOTO 20
FOR f=1 TO 3
IF 10*e+f=13 OR 10*e+f=23 THEN GOTO 10
PRINT a;b;c;d;e;f
10 NEXT f
20 NEXT e
30 NEXT d
40 NEXT c
50 NEXT b
60 NEXT a
END
   8月6日(木) 9:27:54   MAIL:FTT   34888

過去問題一覧へ戻る