過去ログ

ゴンとも

以下の十進basicでごく簡単なプログラムで
2008個を列挙するも
最初kとhを間違え804個でそのミスを見つけるのに
ひどく時間がかかりました。

FOR a=0 TO 3
FOR b=0 TO 3
FOR c=0 TO 3
FOR d=0 TO 3
if a+b+c+d<>3 then goto 130
FOR e=0 TO 3
FOR f=0 TO 3
FOR g=0 TO 3
FOR h=0 TO 3
if e+f+g+h<>3 then goto 90
FOR i=0 TO 3
FOR j=0 TO 3
FOR k=0 TO 3
FOR l=0 TO 3
if i+j+k+l<>3 then goto 50
FOR m=0 TO 3
if a+e+i+m<>3 then goto 40
FOR n=0 TO 3
if b+f+j+n<>3 then goto 30
FOR o=0 TO 3
if c+g+k+o<>3 then goto 20
FOR p=0 TO 3
if m+n+o+p<>3 or d+h+l+p<>3 then goto 10
PRINT a;b;c;d;e;f;g;h;i;j;k;l;m;n;o;p
10 NEXT p
20 NEXT o
30 NEXT n
40 NEXT m
50 NEXT l
60 NEXT k
70 NEXT j
80 NEXT i
90 NEXT h
100 NEXT g
110 NEXT f
120 NEXT e
130 NEXT d
140 NEXT c
150 NEXT b
160 NEXT a
END

豊川市　　 1月17日（木） 12:45:46　　 MAIL:fttnm528@ybb.ne.jp 　　31447

過去問題一覧へ戻る