£Í£ò.¥À¥ó¥Ç¥£
¤É¤Î£³¿§¤«¤Ç¡¡4£Ã3¡ÊÄ̤ê¡Ë¡¢¤É¤Î¿ô»ú¤«¤Ç¡¡5£Ã3¡ÊÄ̤ê¡Ë
¿ô»ú¤¬¡¡¡ü¡ü¡ü¢¤¢¤¢¢¥¿¥¤¥×¤Ç¡¡¿§¤Î·è¤áÊý¤Ï¡¡3!*1*3*3¡á54¡¡¡ÊÄ̤ê¡Ë
¡ü¡ü¢¤¢¤¢¢¢¢¥¿¥¤¥×¤Ç¡¡¿§¤Î·è¤áÊý¤Ï¡¡¡Ê3£Ã2¡Ë¡°3¡Ý3¡á24¡¡¡ÊÄ̤ê¡Ë
¤·¤¿¤¬¤Ã¤Æ
4£Ã3*5£Ã3*¡Ê54¡Ü24¡Ë¡á3120¡¡¡ÊÄ̤ê¡Ë
¹¥¤­¤Ê¥¿¥¤¥×¤ÎÌäÂê¤À¤Ã¤¿¤À¤±¤Ë¡¢Èæ³ÓŪÁ᤯²ò¤±¤Þ¤·¤¿¡£
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 0:36:23¡¡¡¡ ¡¡¡¡39313
¤«¤¨¤ë
¡Ê£±¡Ë¿§£²¡¼£²¡¼£²¤Î¾ì¹ç
¡Ê£±¡Ý£±¡Ë¿ô»ú£²¡Ý£²¡Ý£²
£Ã¡Ê£´¡¤£³¡Ë¡ß£Ð¡Ê£µ¡¤£³¡Ë¡á£²£´£°Ä̤ê
¡Ê£±¡Ý£²¡Ë¿ô»ú£±¡Ý£²¡Ý£³
£Ð¡Ê£´¡¤£³¡Ë¡ß£Ð¡Ê£µ¡¤£³¡Ë¡á£±£´£´£°Ä̤ê
¡Ê£²¡Ë¿§£±¡¼£²¡¼£³¤Î¾ì¹ç¤Ï¿ô»ú£±¡Ý£²¡Ý£³
£Ð¡Ê£´¡¤£³¡Ë¡ß£Ð¡Ê£µ¡¤£³¡Ë¡á£±£´£´£°Ä̤ê
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 0:24:15¡¡¡¡ ¡¡¡¡39314
¥¹¥â¡¼¥¯¥Þ¥ó
4C3*5C3*(9C6-6)=3120
¢ö
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 0:33:51¡¡¡¡ ¡¡¡¡39315
abcba@baLLjugglermoka
°ì¤Ä¤Î¿§¤«¤é¤ÏºÇÂ磳Ëç¡£
³Æ¿§¤«¤é(3,2,1)¤Î¾ì¹ç¡§9¡ß6¡ß4¡ß10=2160
³Æ¿§¤«¤é(2,2,2)¾ì¹ç¡§24¡ß4¡ß10=960
2160+960=3120

·ë¶É¾ì¹çʬ¤±¤Î²òË¡¤Ç¤¹¤Í¡£°ì¤Ä¤Î¼°¤Çµá¤á¤è¤¦¤È¤·¤Æ°ÕÌ£¤Ê¤¯¥¿¥¤¥à¥í¥¹¤·¤¿¤Î¤Ï¤³¤³¤À¤±¤ÎÆâ½ï¤È¤¤¤¦¤³¤È¤Ç(¾Ð)
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 0:56:06¡¡¡¡ ¡¡¡¡39316
Ä̤ꤹ¤¬¤ê
ExcelVBA¤À¤È¡¢¤³¤ó¤Ê´¶¤¸¤«¤Ê¤¡¡Á

Public Sub Âè790²óÌäÂê()
¡¡¡¡Cells.Clear
¡¡¡¡Dim cards() As String
¡¡¡¡cards = Split("ÀÖ1,Çò1,ÀÄ1,ÎÐ1,ÀÖ2,Çò2,ÀÄ2,ÎÐ2,ÀÖ3,Çò3,ÀÄ3,ÎÐ3,ÀÖ4,Çò4,ÀÄ4,ÎÐ4,ÀÖ5,Çò5,ÀÄ5,ÎÐ5", ",")
¡¡¡¡Dim fcards(1 To 6) As String
¡¡¡¡Dim count As Integer
¡¡¡¡Fetch LBound(fcards), fcards, LBound(cards), cards, count
¡¡¡¡Cells(1, 1) = count
End Sub

Private Sub Fetch(p As Integer, fcards() As String, n As Integer, cards() As String, count As Integer)
¡¡¡¡If p > UBound(fcards) Then
¡¡¡¡¡¡¡¡Dim colors As String
¡¡¡¡¡¡¡¡Dim nos As String
¡¡¡¡¡¡¡¡Dim s As String
¡¡¡¡¡¡¡¡Dim i As Integer
¡¡¡¡¡¡¡¡For i = LBound(fcards) To UBound(fcards)
¡¡¡¡¡¡¡¡¡¡¡¡If InStr(colors, Left(fcards(i), 1)) = 0 Then colors = colors + Left(fcards(i), 1)
¡¡¡¡¡¡¡¡¡¡¡¡If InStr(nos, Right(fcards(i), 1)) = 0 Then nos = nos + Right(fcards(i), 1)
¡¡¡¡¡¡¡¡¡¡¡¡s = s + fcards(i) + " "
¡¡¡¡¡¡¡¡Next
¡¡¡¡¡¡¡¡If Len(colors) = 3 And Len(nos) = 3 Then
¡¡¡¡¡¡¡¡¡¡¡¡count = count + 1
¡¡¡¡¡¡¡¡¡¡¡¡Cells(count, 2) = s
¡¡¡¡¡¡¡¡End If
¡¡¡¡¡¡¡¡Exit Sub
¡¡¡¡End If
¡¡¡¡If n > UBound(cards) Then Exit Sub
¡¡¡¡Fetch p, fcards, n + 1, cards, count
¡¡¡¡fcards(p) = cards(n)
¡¡¡¡Fetch p + 1, fcards, n + 1, cards, count
End Sub
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 10:26:35¡¡¡¡ ¡¡¡¡39317
AD164¤Î©»Ò
¤Ò¤¿¤¹¤é¾ì¹ç¤ï¤±¡££±¡¢¿§¤¬AAABBC¤Ë¤Ê¤ë¾ì¹ç2¡¢¿ô»ú¤¬12¡¢13¡¢23 ¤Ë¤Ê¤ë¾ì¹ç3¡¢¿ô»ú¤¬12¡¢12¡¢13 ¤Ë¤Ê¤ë¾ì¹ç ½ÐÄ¥ÅÓÃæ¤Ç¥¹¥Þ¥Û¤«¤é¡£¤Þ¤Àʸ»úÆþÎϤ¬²ø¤·¤¤¤Ç¤¹¡£
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 10:45:57¡¡¡¡ ¡¡¡¡39318
uchinyan
¤Ï¤¤¡¤¤³¤ó¤Ë¤Á¤Ï¡£¤µ¤Æ¡¤º£²ó¤ÎÌäÂê¤Ï¡¥¡¥¡¥
ºÇ½é¤ËÌäÂê¤ò¸«¤¿¤È¤­¤ÏÌÌÅݤ½¤¦¤Êµ¤¤¬¤·¤¿¤Î¤Ç¤¹¤¬¡¤°Õ³°¤È´Êñ¤Ç¤·¤¿¡£¤³¤ó¤Ê´¶¤¸¤Ç¡£

£´¿§¤«¤é£³¼ïÎà¤Î¿§¤òÁª¤Ö¤Î¤Ï 4C3 Ä̤ꡤ£µ¸Ä¤Î¿ô»ú¤«¤é£³¼ïÎà¤Î¿ô»ú¤òÁª¤Ö¤Î¤Ï 5C3 Ä̤ê¤Ç¡¤
³Æ¿§¤ËƱ¤¸¤è¤¦¤Ë£µ¸Ä¤Î¿ô»ú¤¬½ñ¤«¤ì¤Æ¤¤¤ë¤Î¤Ç¡¤¤³¤ì¤é¤ÎÁªÂò¤Ï¼«Í³¤Ë¹Ô¤¨¡¤¹ç·× 4C3 * 5C3 Ä̤ê¤Ç¤¹¡£
¤³¤Î¾ò·ï¤Î²¼¤Ç£³¡ß£³¡á£¹Ëç¤Î¥«¡¼¥É¤¬¸õÊä¤Ë¤Ê¤ê¤Þ¤¹¤¬¡¤¤³¤ÎÃ椫¤é£¶Ëç¤ò¡¤
¿§¤¬£²¼ïÎà°Ê²¼Ëô¤Ï¿ô»ú¤¬£²¼ïÎà°Ê²¼¤Ë¤Ê¤é¤Ê¤¤¤è¤¦¤ËÁª¤Ù¤Ð¤¤¤¤¤Î¤Ç¡¤9C6 - 3 - 3 Ä̤ꡤ¤Ç¤¹¡£
¤³¤ì¤¬¡¤4C3 * 5C3 Ä̤ê¤Î¤¾¤ì¤¾¤ì¤ËÂФ·¤Æ¹Í¤¨¤é¤ì¤ë¤Î¤Ç¡¤
4C3 * 5C3 * (9C6 - 3 - 3) = 4 * 10 * (84 - 6) = 3120 Ä̤ê
¤Ë¤Ê¤ê¤Þ¤¹¡£

¥¤¥á¡¼¥¸¤È¤·¤Æ¤Ï¡¤¿§¤ò²£¼´¤Ë¿ô»ú¤ò½Ä¼´¤Ë¤¹¤ë¤È¡¤¤½¤ì¤é¤Î¼´¤ËÊ¿¹Ô¤ÊľÀþ¤Ç¤Ç¤­¤ë³Ê»Ò¤Î 20 ¸Ä¤Î¸òÅÀ¤«¤é¡¤
ºÇ½é¤Ë¡¤½Ä¼´¤ËÊ¿¹Ô¤Ê£³ËܤȲ£¼´¤ËÊ¿¹Ô¤Ê£³ËܤòÁª¤Ó¡¤¤½¤ì¤é¤Î£¹¸Ä¤Î¸òÅÀ¤«¤é¾ò·ï¤Ë¹ç¤¦£¶ÅÀ¤òÁª¤Ö¡¤
¤È¤¤¤¦´¶³Ð¤Ç¤·¤¿¡£¿§¤È¿ô»ú¤ÎÆÈΩÀ­¤¬¸ú¤¤¤Æ¤¤¤Þ¤¹¤Í¡£
¥Í¥³¤Î½»¤à²È¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 11:42:32¡¡¡¡ MAIL:uchi@sco.bekkoame.ne.jp ¡¡¡¡39319
¼¡ÏºÄ¹
Á°²ó¤Ï¤µ¤Ã¤Ñ¤ê»å¸ý¤¬¸«¤Ä¤±¤é¤ì¤º¤Ë´°ÇÔ¡£
Á°²ó¤Î²òÅú¤òÆɤि¤á¤Ëº£²ó¤Ïɬ»à¤Ë²ò¤­¤Þ¤·¤¿¡£
¤Ê¤Î¤Ë¡¢º£Æü¤ÏĶ˻¤·¤¯¤Æ»þ´Ö¤¬¤Ê¤¤¡£
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 12:15:08¡¡¡¡ ¡¡¡¡39320
uchinyan
(¾¯¤·Äɲý¤Àµ¤·¤Þ¤·¤¿¡£)
·Ç¼¨ÈĤòÆɤߤޤ·¤¿¡£
³§¤µ¤ó¤Û¤ÜƱ¤¸¤Ê¤Î¤Ç¤¹¤¬¡¤¹Í¤¨Êý¤È¤·¤Æ¤ÏÈù̯¤Ë°ã¤¦¤è¤¦¤Ç¤¹¡£

#39313
¤Þ¤º£³¼ïÎà¤Î¿§¤È£³¼ïÎà¤Î¿ô»ú¤ò·è¤á¡¤¤½¤ì¤ËÂФ·¤Æ¿ô»ú¤Î¥Ñ¥¿¡¼¥ó¤ÇʬÎष¡¤¤½¤ì¤Ë¿§¤òÅö¤Æ¤Ï¤á¤ë¡¤¤È¤¤¤¦²òË¡¡£

#39314¡¤#39318
¿§¤Î¥Ñ¥¿¡¼¥ó¤È¿ô»ú¤Î¥Ñ¥¿¡¼¥ó¤ÇʬÎष¡¤¤½¤ì¤Ë¿§¤È¿ô»ú¤òÅö¤Æ¤Ï¤á¤Æ¤¤¤¯²òË¡¡£

#39315¡¤#39319¡¤#39322¡¤#39325
¤Þ¤º£³¼ïÎà¤Î¿§¤È£³¼ïÎà¤Î¿ô»ú¤ò·è¤á¡¤¤½¤Î£³¡ß£³¡á£¹Ëç¤Î¸õÊä¤Î¥«¡¼¥É¤ÎÃ椫¤é£¶Ëç¤ò¡¤
¿§¤¬£²¼ïÎà°Ê²¼Ëô¤Ï¿ô»ú¤¬£²¼ïÎà°Ê²¼¤Ë¤Ê¤é¤Ê¤¤¤è¤¦¤ËÁª¤Ö¡¤¤È¤¤¤¦²òË¡¡£

#39316
³Æ¿§¤ÎºÇÂçËç¿ô¤¬£³Ëç¤Ç¤¢¤ë¤³¤È¤«¤é¡¤³Æ¿§¤ÎËç¿ô¤Î¥Ñ¥¿¡¼¥ó¤ÇʬÎष¡¤¤½¤ì¤Ë¿ô»ú¤òÅö¤Æ¤Ï¤á¤Æ¤¤¤¯²òË¡¡£
·×»»¼°¤Ê¤É¸«¤¿ÌܤÏ#39313¤Ã¤Ý¤¯¸«¤¨¤ë¤Î¤Ç¤¹¤¬¡¤¹Í¤¨Êý¤È¤·¤Æ¤Ï#39314¤Ë¶á¤¤¤Î¤«¤Ê¡©

#39317¡¤#39327
¥×¥í¥°¥é¥à¤Ë¤è¤ë²òË¡¡£
¥Í¥³¤Î½»¤à²È¡¡¡¡ 5·î11Æü¡Ê¶â¡Ë 15:02:28¡¡¡¡ ¡¡¡¡39321
cocolo
#39319¤Îuchinyan¤µ¤ó¤Î²ò¤­Êý¤È¤Þ¤Ã¤¿¤¯Æ±¤¸¤Ç¤·¤¿¡£
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 15:59:56¡¡¡¡ ¡¡¡¡39322
AD164¤Î©»Ò
¤¹¤¤¤Þ¤»¤ó¡£Àè¹ÔÅê¹Æ¤è¤¯Æɤá¤Æ¤Þ¤»¤ó¤Ç¤·¤¿¡£¤«¤¨¤ëÍÍ39314#¤ÈƱ°ì¤Ç¤·¤¿¡£
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 16:31:51¡¡¡¡ ¡¡¡¡39323
AD164¤Î©»Ò
¤¹¤¤¤Þ¤»¤ó¡£Àè¹ÔÅê¹Æ¤è¤¯Æɤá¤Æ¤Þ¤»¤ó¤Ç¤·¤¿¡£¤«¤¨¤ëÍÍ39314#¤ÈƱ°ì¤Ç¤·¤¿¡£
¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 16:31:52¡¡¡¡ ¡¡¡¡39324
hide
#39319¤Îuchinyan¤µ¤ó¤ÈÁ´¤¯Æ±¤¸²ò¤­Êý¤Ç¤·¤¿
¤³¤³ºÇ¶á¤Ç°ìÈÖ´Êñ¤À¤Ã¤¿

¤Þ¤Ã¤¿¤¯´Ø·¸¤Ê¤¤»ä»ö¤Ç¤¹¤¬¡¢¿ô¸¡£±µé¤Ë¹ç³Ê¤·¤Þ¤·¤¿¡¼
¥¢¥ê¥¢¥Ï¥ó¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 19:53:24¡¡¡¡ ¡¡¡¡39325
¥Ï¥é¥®¥ã¡¼¥Æ¥¤
¥×¥í¥°¥é¥à¤Ç¤¹¡£´Êñ¤Ê¥×¥í¥°¥é¥à¤Ç¤Ç¤­¤ë¤Î¤Ç¤¹¤¬¡¢ÌÌÅݤ¯¤µ¤¯´¶¤¸¤ë¤è¤¦¤Ë¤Ê¤Ã¤ÆÍè¤Þ¤·¤¿¡£
´ó¤ëǯÇȤ˾¡¤Æ¤º¤¬¶á¤Å¤¤¤Æ¤­¤Æ¤¤¤ë¤è¤¦¤Êµ¤¤â¤·¤Þ¤¹¡£
»³¸ý¡¡¡¡ 5·î10Æü¡ÊÌÚ¡Ë 21:00:22¡¡¡¡ HomePage:À©¸æ¹©³Ø¤Ë¥Á¥ã¥ì¥ó¥¸¡¡¡¡39327
£Í£ò.¥À¥ó¥Ç¥£
#39325 hide¤µ¤ó¡¡¿ô¸¡£±µé¹ç³Ê¤ª¤á¤Ç¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
¤¹¤´¤¤¤Ç¤¹¤Í¡Á
¡ÊÎϤΤ¢¤ëÊý¤À¤È¤Ï»×¤Ã¤Æ¤¤¤¿¤Î¤Ç¤¹¤¬¡¢¤µ¤¹¤¬¤Ç¤¹¤Í¡Ë
¡¡¡¡ 5·î11Æü¡Ê¶â¡Ë 11:34:33¡¡¡¡ ¡¡¡¡39328
uchinyan
#39325
¡ä¤Þ¤Ã¤¿¤¯´Ø·¸¤Ê¤¤»ä»ö¤Ç¤¹¤¬¡¢¿ô¸¡£±µé¤Ë¹ç³Ê¤·¤Þ¤·¤¿¡¼
¤¹¤´¤¤¡ª ³Î¤«¡¤¿ô¸¡£±µé¤Ã¤ÆÂç³Ø¥ì¥Ù¥ë¤Ç¤¹¤è¤Í¡£¤ª¤á¤Ç¤È¤¦¤´¤¶¤¤¤Þ¤¹¡£
¥Í¥³¤Î½»¤à²È¡¡¡¡ 5·î11Æü¡Ê¶â¡Ë 15:01:29¡¡¡¡ MAIL:uchi@sco.bekkoame.ne.jp ¡¡¡¡39329
¤­¤ç¤íʸ
¤¼¤ó¤¼¤ó»×¤¤¤Ä¤«¤Ê¤«¤Ã¤¿¡¡¥¹¥Þ¡¼¥È¤¹¤®¤ë¡¦¡¦¡¦
¡¡¡¡ 5·î11Æü¡Ê¶â¡Ë 19:50:45¡¡¡¡ ¡¡¡¡39330
kotani
¤«¤Ê¤ê¹Í¤¨¤Ê¤±¤ì¤Ð²óÅú¤Ç¤­¤Ê¤¤ÌäÂê¤Ç¤·¤¿¡£
¹Í¤¨°ã¤¤¤ò¡¢¤«¤Ê¤ê·«¤êÊÖ¤·¤¿Ëö¤Ë¤ä¤Ã¤È²òÅú¤Ë¤¿¤É¤êÃ夭¤Þ¤·¤¿¡£
¡¡¡¡ 5·î13Æü¡ÊÆü¡Ë 19:01:06¡¡¡¡ MAIL:xv7da2@bma.biglobe.ne.jp ¡¡¡¡39331
hide
#39328 #39329
¤¢¤ê¤¬¤È¤¦¤´¤¶¤¤¤Þ¤¹
¾å°Ì¾ïÏ¢¤µ¤óÊý¤Ë¤Ï¤Þ¤À¤Þ¤À¤«¤Ê¤¤¤Þ¤»¤ó¤¬¡¢»»¥Á¥ã¥ì¤Ç¤â¥È¥Ã¥×£±£°Æþ¤êÌܻؤ·¤Æ´èÄ¥¤ê¤¿¤¤¤È»×¤¤¤Þ¤¹
¥¢¥ê¥¢¥Ï¥ó¡¡¡¡ 5·î14Æü¡Ê·î¡Ë 13:45:36¡¡¡¡ ¡¡¡¡39332
fumio
¤ä¤Ã¤È²ò¤±¤¿¡Ê¾Ð¡Ë
¤Ç¤Ï¤Ç¤Ï¡¢¤Þ¤¿¤Þ¤¿¡£
¡¡¡¡ 5·î15Æü¡Ê²Ð¡Ë 1:33:38¡¡¡¡ ¡¡¡¡39333