|
ゴンとも |
|
総得点0から12までをs0,..,s12として
答えs4+s5+s6+s7+s8とその他の点を求めると FOR a=0 TO 2 FOR b=0 TO 2 FOR c=0 TO 2 FOR d=0 TO 2 FOR e=0 TO 2 FOR f=0 TO 2 IF a+b+c+d+e+f=0 THEN LET s0=s0+1 IF a+b+c+d+e+f=1 THEN LET s1=s1+1 IF a+b+c+d+e+f=2 THEN LET s2=s2+1 IF a+b+c+d+e+f=3 THEN LET s3=s3+1 IF a+b+c+d+e+f=4 THEN LET s4=s4+1 IF a+b+c+d+e+f=5 THEN LET s5=s5+1 IF a+b+c+d+e+f=6 THEN LET s6=s6+1 IF a+b+c+d+e+f=7 THEN LET s7=s7+1 IF a+b+c+d+e+f=8 THEN LET s8=s8+1 IF a+b+c+d+e+f=9 THEN LET s9=s9+1 IF a+b+c+d+e+f=10 THEN LET s10=s10+1 IF a+b+c+d+e+f=11 THEN LET s11=s11+1 IF a+b+c+d+e+f=12 THEN LET s12=s12+1 NEXT f NEXT e NEXT d NEXT c NEXT b NEXT a PRINT s0;s1;s2;s3;s4;s5;s6 PRINT s12;s11;s10;s9;s8;s7;s4+s5+s6+s7+s8;"通り・・・・・・(答え)" END f9 押して 1 6 21 50 90 126 141 1 6 21 50 90 126 573 通り・・・・・・(答え) |
|
豊川市
2月20日（木） 5:11:04
41457 |