|
ゴンとも |
|
十進Basic でカードで1は変数1,2,3はそれぞれ変数-2,-3として
引く回数でa,b,c,d,e,f,g,h,iの9回で for a=-3 to 1 if a=-1 or a=0 then goto 90 for b=-3 to 1 if b=-1 or b=0 then goto 80 for c=-3 to 1 if c=-1 or c=0 or 3+int(1/a)+int(1/b)+int(1/c)=0 or 3+int(1/a)+int(1/b)+int(1/c)=6 then goto 70 for d=-3 to 1 if d=-1 or d=0 or 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)=0 or 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)=6 then goto 60 for e=-3 to 1 if e=-1 or e=0 then goto 50 if 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)=0 or 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)=6 then goto 50 for f=-3 to 1 if f=-1 or f=0 then goto 40 if 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)=0 or 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)=6 then goto 40 for g=-3 to 1 if g=-1 or g=0 then goto 30 if 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)+int(1/g)=0 or 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)+int(1/g)=6 then goto 30 for h=-3 to 1 if h=-1 or h=0 then goto 20 if 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)+int(1/g)+int(1/h)=0 or 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)+int(1/g)+int(1/h)=6 then goto 20 for i=-3 to 1 if i=-1 or i=0 then goto 10 if 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)+int(1/g)+int(1/h)+int(1/i)=0 then goto 10 if 3+int(1/a)+int(1/b)+int(1/c)+int(1/d)+int(1/e)+int(1/f)+int(1/g)+int(1/h)+int(1/i)=6 then let s=s+1 10 next i 20 next h 30 next g 40 next f 50 next e 60 next d 70 next c 80 next b 90 next a print s end f9押して 216・・・・・・(答え) |
|
豊川市
1月21日（木） 1:28:41
MAIL:fttnm528@ybb.ne.jp 44069 |