|
ゴンとも |
|
十進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 |