過去ログ

ゴンとも
十進basicで

LET s=0
FOR a=1 TO 5
FOR b=1 TO 5
IF ABS(b-a)<>1 THEN GOTO 60
FOR c=1 TO 5
IF ABS(c-b)<>1 THEN GOTO 50
FOR d=1 TO 5
IF ABS(d-c)<>1 THEN GOTO 40
FOR e=1 TO 5
IF ABS(e-d)<>1 THEN GOTO 30
FOR f=1 TO 5
IF ABS(f-e)<>1 THEN GOTO 20
FOR g=1 TO 5
IF ABS(g-f)<>1 THEN GOTO 10
LET s=s+1
10 NEXT g
20 NEXT f
30 NEXT e
40 NEXT d
50 NEXT c
60 NEXT b
70 NEXT a
PRINT s
END

f9押して 126・・・・・・(答え)
豊川市   12月27日(木) 2:24:12   MAIL:fttnm528@ybb.ne.jp   40129

過去問題一覧へ戻る