|
ゴンとも |
|
今日は寝てました。3時ごろだったのですが3分ぐらいでできました。
以下の十進BASICで80個を列挙しました。 FOR a=1 TO 1155 IF MOD(4620,a)<>0 THEN GOTO 30 FOR b=a+1 TO 2310 IF MOD(4620,b)<>0 THEN GOTO 20 FOR c=b+1 TO 4620 IF MOD(4620,c)<>0 THEN GOTO 10 IF a*b*c=4620 THEN PRINT a;b;c 10 NEXT c 20 NEXT b 30 NEXT a END 1 2 2310 1 3 1540 1 4 1155 1 5 924 1 6 770 1 7 660 1 10 462 1 11 420 1 12 385 1 14 330 1 15 308 1 20 231 1 21 220 1 22 210 1 28 165 1 30 154 1 33 140 1 35 132 1 42 110 1 44 105 1 55 84 1 60 77 1 66 70 2 3 770 2 5 462 2 6 385 2 7 330 2 10 231 2 11 210 2 14 165 2 15 154 2 21 110 2 22 105 2 30 77 2 33 70 2 35 66 2 42 55 3 4 385 3 5 308 3 7 220 3 10 154 3 11 140 3 14 110 3 20 77 3 22 70 3 28 55 3 35 44 4 5 231 4 7 165 4 11 105 4 15 77 4 21 55 4 33 35 5 6 154 5 7 132 5 11 84 5 12 77 5 14 66 5 21 44 5 22 42 5 28 33 6 7 110 6 10 77 6 11 70 6 14 55 6 22 35 7 10 66 7 11 60 7 12 55 7 15 44 7 20 33 7 22 30 10 11 42 10 14 33 10 21 22 11 12 35 11 14 30 11 15 28 11 20 21 14 15 22 |
|
豊川市
5月13日(木) 3:48:55
MAIL:fttnm528@ybb.ne.jp 36226 |