|
ゴンとも |
|
十進Basic で 問題図に番号を振る
(13)(14) (11)(12) (09)(10) (07)(08) (05)(06) (03)(04) (01)(02) FOR a=1 to 1 FOR b=2 to 4 if b=a then goto 130 FOR c=2 to 6 if c=a or c=b then goto 120 if b=2 and (c<>3 and c<>4) then goto 120 if b=3 and (c<>2 and c<>4 and c<>5 and c<>6) then goto 120 if b=4 and (c<>2 and c<>3 and c<>5 and c<>6) then goto 120 FOR d=2 to 8 if d=a or d=b or d=c then goto 110 if c=2 and (d<>3 and d<>4) then goto 110 if c=3 and (d<>2 and d<>4 and d<>5 and d<>6) then goto 110 if c=4 and (d<>2 and d<>3 and d<>5 and d<>6) then goto 110 if c=5 and (d<>3 and d<>4 and d<>6 and d<>7 and d<>8) then goto 110 if c=6 and (d<>3 and d<>4 and d<>5 and d<>7 and d<>8) then goto 110 FOR e=2 to 10 if e=a or e=b or e=c or e=d then goto 100 if d=2 and (e<>3 and e<>4) then goto 100 if d=3 and (e<>2 and e<>4 and e<>5 and e<>6) then goto 100 if d=4 and (e<>2 and e<>3 and e<>5 and e<>6) then goto 100 if d=5 and (e<>3 and e<>4 and e<>6 and e<>7 and e<>8) then goto 100 if d=6 and (e<>3 and e<>4 and e<>5 and e<>7 and e<>8) then goto 100 if d=7 and (e<>5 and e<>6 and e<>8 and e<>9 and e<>10) then goto 100 if d=8 and (e<>5 and e<>6 and e<>7 and e<>9 and e<>10) then goto 100 FOR f=2 to 12 if f=a or f=b or f=c or f=d or f=e then goto 90 if e=2 and (f<>3 and f<>4) then goto 90 if e=3 and (f<>2 and f<>4 and f<>5 and f<>6) then goto 90 if e=4 and (f<>2 and f<>3 and f<>5 and f<>6) then goto 90 if e=5 and (f<>3 and f<>4 and f<>6 and f<>7 and f<>8) then goto 90 if e=6 and (f<>3 and f<>4 and f<>5 and f<>7 and f<>8) then goto 90 if e=7 and (f<>5 and f<>6 and f<>8 and f<>9 and f<>10) then goto 90 if e=8 and (f<>5 and f<>6 and f<>7 and f<>9 and f<>10) then goto 90 if e=9 and (f<>7 and f<>8 and f<>10 and f<>11 and f<>12) then goto 90 if e=10 and (f<>7 and f<>8 and f<>9 and f<>11 and f<>12) then goto 90 FOR g=2 to 14 if g=a or g=b or g=c or g=d or g=e or g=f then goto 80 if f=2 and (g<>3 and g<>4) then goto 80 if f=3 and (g<>2 and g<>4 and g<>5 and g<>6) then goto 80 if f=4 and (g<>2 and g<>3 and g<>5 and g<>6) then goto 80 if f=5 and (g<>3 and g<>4 and g<>6 and g<>7 and g<>8) then goto 80 if f=6 and (g<>3 and g<>4 and g<>5 and g<>7 and g<>8) then goto 80 if f=7 and (g<>5 and g<>6 and g<>8 and g<>9 and g<>10) then goto 80 if f=8 and (g<>5 and g<>6 and g<>7 and g<>9 and g<>10) then goto 80 if f=9 and (g<>7 and g<>8 and g<>10 and g<>11 and g<>12) then goto 80 if f=10 and (g<>7 and g<>8 and g<>9 and g<>11 and g<>12) then goto 80 if f=11 and (g<>9 and g<>10 and g<>12 and g<>13 and g<>14) then goto 80 if f=12 and (g<>9 and g<>10 and g<>11 and g<>13 and g<>14) then goto 80 if f=13 and (g<>11 and g<>12) then goto 80 if f=14 and (g<>11 and g<>12) then goto 80 FOR h=2 to 14 if h=a or h=b or h=c or h=d or h=e or h=f or h=g then goto 70 if g=2 and (h<>3 and h<>4) then goto 70 if g=3 and (h<>2 and h<>4 and h<>5 and h<>6) then goto 70 if g=4 and (h<>2 and h<>3 and h<>5 and h<>6) then goto 70 if g=5 and (h<>3 and h<>4 and h<>6 and h<>7 and h<>8) then goto 70 if g=6 and (h<>3 and h<>4 and h<>5 and h<>7 and h<>8) then goto 70 if g=7 and (h<>5 and h<>6 and h<>8 and h<>9 and h<>10) then goto 70 if g=8 and (h<>5 and h<>6 and h<>7 and h<>9 and h<>10) then goto 70 if g=9 and (h<>7 and h<>8 and h<>10 and h<>11 and h<>12) then goto 70 if g=10 and (h<>7 and h<>8 and h<>9 and h<>11 and h<>12) then goto 70 if g=11 and (h<>9 and h<>10 and h<>12 and h<>13 and h<>14) then goto 70 if g=12 and (h<>9 and h<>10 and h<>11 and h<>13 and h<>14) then goto 70 if g=13 and (h<>11 and h<>12) then goto 70 if g=14 and (h<>11 and h<>12) then goto 70 FOR i=2 to 14 if i=a or i=b or i=c or i=d or i=e or i=f or i=g or i=h then goto 60 if g+i=27 then goto 60 if h=2 and (i<>3 and i<>4) then goto 60 if h=3 and (i<>2 and i<>4 and i<>5 and i<>6) then goto 60 if h=4 and (i<>2 and i<>3 and i<>5 and i<>6) then goto 60 if h=5 and (i<>3 and i<>4 and i<>6 and i<>7 and i<>8) then goto 60 if h=6 and (i<>3 and i<>4 and i<>5 and i<>7 and i<>8) then goto 60 if h=7 and (i<>5 and i<>6 and i<>8 and i<>9 and i<>10) then goto 60 if h=8 and (i<>5 and i<>6 and i<>7 and i<>9 and i<>10) then goto 60 if h=9 and (i<>7 and i<>8 and i<>10 and i<>11 and i<>12) then goto 60 if h=10 and (i<>7 and i<>8 and i<>9 and i<>11 and i<>12) then goto 60 if h=11 and (i<>9 and i<>10 and i<>12 and i<>13 and i<>14) then goto 60 if h=12 and (i<>9 and i<>10 and i<>11 and i<>13 and i<>14) then goto 60 if h=13 and (i<>11 and i<>12) then goto 60 if h=14 and (i<>11 and i<>12) then goto 60 FOR j=2 to 14 if j=a or j=b or j=c or j=d or j=e or j=f or j=g or j=h or j=i then goto 50 if g+j=27 or h+j=27 then goto 50 if i=2 and (j<>3 and j<>4) then goto 50 if i=3 and (j<>2 and j<>4 and j<>5 and j<>6) then goto 50 if i=4 and (j<>2 and j<>3 and j<>5 and j<>6) then goto 50 if i=5 and (j<>3 and j<>4 and j<>6 and j<>7 and j<>8) then goto 50 if i=6 and (j<>3 and j<>4 and j<>5 and j<>7 and j<>8) then goto 50 if i=7 and (j<>5 and j<>6 and j<>8 and j<>9 and j<>10) then goto 50 if i=8 and (j<>5 and j<>6 and j<>7 and j<>9 and j<>10) then goto 50 if i=9 and (j<>7 and j<>8 and j<>10 and j<>11 and j<>12) then goto 50 if i=10 and (j<>7 and j<>8 and j<>9 and j<>11 and j<>12) then goto 50 if i=11 and (j<>9 and j<>10 and j<>12 and j<>13 and j<>14) then goto 50 if i=12 and (j<>9 and j<>10 and j<>11 and j<>13 and j<>14) then goto 50 if i=13 and (j<>11 and j<>12) then goto 50 if i=14 and (j<>11 and j<>12) then goto 50 FOR k=2 to 14 if k=a or k=b or k=c or k=d or k=e or k=f or k=g or k=h or k=i or k=j then goto 40 if i+k=27 or h+k=27 or g+k=27 then goto 40 if j=2 and (k<>3 and k<>4) then goto 40 if j=3 and (k<>2 and k<>4 and k<>5 and k<>6) then goto 40 if j=4 and (k<>2 and k<>3 and k<>5 and k<>6) then goto 40 if j=5 and (k<>3 and k<>4 and k<>6 and k<>7 and k<>8) then goto 40 if j=6 and (k<>3 and k<>4 and k<>5 and k<>7 and k<>8) then goto 40 if j=7 and (k<>5 and k<>6 and k<>8 and k<>9 and k<>10) then goto 40 if j=8 and (k<>5 and k<>6 and k<>7 and k<>9 and k<>10) then goto 40 if j=9 and (k<>7 and k<>8 and k<>10 and k<>11 and k<>12) then goto 40 if j=10 and (k<>7 and k<>8 and k<>9 and k<>11 and k<>12) then goto 40 if j=11 and (k<>9 and k<>10 and k<>12 and k<>13 and k<>14) then goto 40 if j=12 and (k<>9 and k<>10 and k<>11 and k<>13 and k<>14) then goto 40 if j=13 and (k<>11 and k<>12) then goto 40 if j=14 and (k<>11 and k<>12) then goto 40 FOR l=2 to 14 if l=a or l=b or l=c or l=d or l=e or l=f or l=g or l=h or l=i or l=j or l=k then goto 30 if i+l=27 or h+l=27 or g+l=27 then goto 30 if k=2 and (l<>3 and l<>4) then goto 30 if k=3 and (l<>2 and l<>4 and l<>5 and l<>6) then goto 30 if k=4 and (l<>2 and l<>3 and l<>5 and l<>6) then goto 30 if k=5 and (l<>3 and l<>4 and l<>6 and l<>7 and l<>8) then goto 30 if k=6 and (l<>3 and l<>4 and l<>5 and l<>7 and l<>8) then goto 30 if k=7 and (l<>5 and l<>6 and l<>8 and l<>9 and l<>10) then goto 30 if k=8 and (l<>5 and l<>6 and l<>7 and l<>9 and l<>10) then goto 30 if k=9 and (l<>7 and l<>8 and l<>10 and l<>11 and l<>12) then goto 30 if k=10 and (l<>7 and l<>8 and l<>9 and l<>11 and l<>12) then goto 30 if k=11 and (l<>9 and l<>10 and l<>12 and l<>13 and l<>14) then goto 30 if k=12 and (l<>9 and l<>10 and l<>11 and l<>13 and l<>14) then goto 30 if k=13 and (l<>11 and l<>12) then goto 30 if k=14 and (l<>11 and l<>12) then goto 30 FOR m=2 to 14 if m=a or m=b or m=c or m=d or m=e or m=f or m=g or m=h or m=i or m=j or m=k or m=l then goto 20 if j+m=27 or i+m=27 or h+m=27 or g+m=27 then goto 20 if l=2 and (m<>3 and m<>4) then goto 20 if l=3 and (m<>2 and m<>4 and m<>5 and m<>6) then goto 20 if l=4 and (m<>2 and m<>3 and m<>5 and m<>6) then goto 20 if l=5 and (m<>3 and m<>4 and m<>6 and m<>7 and m<>8) then goto 20 if l=6 and (m<>3 and m<>4 and m<>5 and m<>7 and m<>8) then goto 20 if l=7 and (m<>5 and m<>6 and m<>8 and m<>9 and m<>10) then goto 20 if l=8 and (m<>5 and m<>6 and m<>7 and m<>9 and m<>10) then goto 20 if l=9 and (m<>7 and m<>8 and m<>10 and m<>11 and m<>12) then goto 20 if l=10 and (m<>7 and m<>8 and m<>9 and m<>11 and m<>12) then goto 20 if l=11 and (m<>9 and m<>10 and m<>12 and m<>13 and m<>14) then goto 20 if l=12 and (m<>9 and m<>10 and m<>11 and m<>13 and m<>14) then goto 20 if l=13 and (m<>11 and m<>12) then goto 20 if l=14 and (m<>11 and m<>12) then goto 20 FOR n=13 to 14 if n=a or n=b or n=c or n=d or n=e or n=f or n=g or n=h or n=i or n=j or n=k or n=l or n=m then goto 10 if n=13 and (m<>11 and m<>12 and m<>14) then goto 10 if n=14 and (m<>11 and m<>12 and m<>13) then goto 10 let s=s+1 10 next n 20 next m 30 next l 40 next k 50 next j 60 next i 70 next h 80 next g 90 next f 100 next e 110 next d 120 next c 130 next b 140 next a print s end f9押して 1344・・・・・・(答え) |
|
豊川市
11月5日（木） 3:01:54
MAIL:fttnm528@ybb.ne.jp 43868 |