過去ログ

ゴンとも
十進Basic で取り出したカード順にa,b,c,d,eとして

FOR a=1 to 5
FOR b=1 to 5
if b=a then goto 40
FOR c=1 to 5
if c=a or c=b then goto 30
FOR d=1 to 5
if d=a or d=b or d=c then goto 20
FOR e=1 to 5
if e=a or e=b or e=c or e=d then goto 10
if mod(abs(a-b)+abs(b-c)+abs(c-d)+abs(d-e),2)=0 then let s=s+1
10 next e
20 next d
30 next c
40 next b
50 next a
print s
end

f9押して 48・・・・・・(答え)
豊川市   12月24日(木) 0:11:11     43997

過去問題一覧へ戻る