CRYING DOLPHIN
ưϡ֣׵٤ߤΤȤƷ׻ޤ
ï⤤ʤԳϡ 523ڡ 0:12:00 HomePage:äȥ֥40570

ʬξ礫䤷ƹͤޤ
ʤȤʥå
СʣˡСʣݣˡܣСʣݣˡǣСʣˡᣴ

ޥ뤵ϥåȤ˿ʤΤ
ٷƤΤȤˤޤٷơϤʤȤޤ
裲롼ס 523ڡ 0:12:54 HomePage:40571

٤ߢ٤ߡΤȤƤäƤޤ
4063̤äƤʤäɡäƤ뤫ɤʬǤ
ܿĻԡ 523ڡ 0:13:51 HomePage:̣λ40572
ʸ
23
1415Τޤ
17ǹͤдñˤǤޤ
523ڡ 0:15:07 40573
abcba@baLLjugglermoka
­ְ㤨59ȤƤޤޤ6C5+7C3+8C1=49
523ڡ 0:16:18 40574
kasama
ʸ򤽤Τޤ޲᤹ȡ٤ߢ٤ߤ⤢Ǥϡ
523ڡ 0:20:13 40575
kasama
#4057
4063ǤäƤȻפޤ
523ڡ 0:23:51 40576
CRYING DOLPHIN
٤ߤñȤΤߤȤ
*1 *2 *3 *4 *5 *6 *7 *8 *9 10 11 12 13 14 15 16
*0 *1 *0 *1 *1 *1 *2 *2 *3 *4 *5 *7 *9 12 16 21
*1 *0 *1 *1 *1 *2 *2 *3 *4 *5 *7 *9 12 16 21 28
*0 *1 *1 *1 *2 *2 *3 *4 *5 *7 *9 12 16 21 28 37
()ᥦ(Ρݣ)()ᥦ(Ρݣ)()ᥢ(Ρݣ)ܥ(Ρݣ)

٤Ϣ³ǧ륱
***1 ***2 ***3 ***4 ***5 ***6 ***7 ***8 ***9 **10 **11 **12 **13 **14 **15 **16
***0 ***1 ***0 ***1 ***2 ***3 ***6 **11 **20 **37 **68 *125 *230 *423 *778 1431
***1 ***0 ***1 ***2 ***3 ***6 **11 **20 **37 **68 *125 *230 *423 *778 1431 2632
***0 ***1 ***2 ***3 ***6 **11 **20 **37 **68 *125 *230 *423 *778 1431 2632 4841
()ᥦ(Ρݣ)()ᥦ(Ρݣ)()ᥢ(Ρݣ)ܥ(Ρݣ)ܥ(Ρݣ)
ï⤤ʤԳϡ 523ڡ 0:45:58 HomePage:äȥ֥40577
Ȥ
ʢ+٤ߤa,ȥå+٤ߤbȤ
Ǹ夬ʢ,ȥåǾʬƤ̤
basic

LET s=0
FOR a=0 TO 5
FOR b=0 TO 7
IF 3*a+2*b=14 OR 3*a+2*b=15 THEN LET s=s+fact(a+b)/(fact(a)*fact(b))
NEXT b
NEXT a
PRINT s
END

f9

49()
˭ԡ 523ڡ 0:49:23 MAIL:fttnm528@ybb.ne.jp 40578
ߤ
ǽȺǸ夬ٷƤǤϤʤʤȤ롼ȰʲΥѥ󤷤ʤ
ʣʢڣܥåȣܵٷƣ󡡢̤
ʣʢڣܥåȣܵٷƣ󡡢ʣߣߣˡʣߣߣˡᣳ̤
ʣʢڣܥåȣܵٷƣ󡡢̤

ʣˡʣˤ¤ϣܣܣᣴ̤ꡣ
523ڡ 1:15:49 40579
󤹤
Ȥ⤵Ʊʢڡܵ٤(3ʬ)ȥȥåܵ٤(2ʬ)ˤޤ16ʬθ1ʬٷƤ­17ʬȤ¤ؤޤ
(1)ʢڡ5ܥȥå1
(2)ʢڡ3ܥȥå4
(3)ʢڡ1ܥȥå7
򤽤줾¤ؤȡ(1)6̤ꡢ(2)35̤ꡢ(3)8̤Ǥ͡

ʤ٤ǤǤˡˤޤ(ºݤCombinationȤޤġ)
ȤʤȤȡ(2)ϼ޽񤤤Ƥ򤱤ʤ̤ǤϤʤǤġ
523ڡ 1:18:41 40580
Mr.ǥ
٤ߤ Ȥ
222221פ6C16̤
2221111פ7C3=35̤
21111111פ8C18̤
ס635849̤ˡȤޤ

ʬٷƤϢ³ƼäƤϤʤȽ񤫤ƤʤΤǡǧȡ
ݤʷ׻򤷤ʤФʤʤǤ͡
523ڡ 1:35:16 40581

#40576
ϤꤽǤ
꤬Ȥޤ
ܿĻԡ 523ڡ 1:43:21 MAIL:dice-k@onyx.ocn.ne.jp HomePage:40582

Ǹ˥򤹤ˤϣʬǸ˥򤹤ˤϣʬǵ٤ߤФΤǡʬȣʬǵ٤ߤѥͤޤܥ򣳡ܥ򣲤ȤСᣲܣܣܣܣܣܣ1̤ˡܣܣܣܣܣʣ̤ˡܣܣܣܣ1̤ˤΣ̤ǡᣲܣܣܣܣܣܣʣ̤ˡܣܣܣܣܣʣ̤ˡܣܣܣܣ1̤ˤΣ̤ʤΤǣܣǣ̤ˤʤޤ
523ڡ 2:34:55 40583

Ǥܣܣܣܣʣ̤
523ڡ 2:36:09 40584
ޥ
äơ޵𤤤ޤm(__)m

ʬε©ΤϢ³Ǽ뤳ȤǽǤȡʸɤ褦˻פޤޤ󡣻Υå­Ǥ

Ȥꤢ

ʸ롣
ޤǤʬˤĤƤϡ4063Ȥǧ롣

Ȥ֤Ȥ餻ƤȻפäƤޤǤ򤪤ơޤǤ
iMac 523ڡ 2:39:01 MAIL:masaru-y@sansu.org HomePage:40585
???
٤ߤ򤤤ǤȤ뤳ȤǤΤʤ顤4063
ǸʢڤʬǽˤƤ褤Τʤ顤77
Option Explicit
Dim a(16) As Integer
Sub Macro1()
Cells(1, 1).Value = 0
Call saiki(1)
End Sub
Sub saiki(ByVal n As Integer)
Dim max As Integer
Dim stepp As Integer
Dim j As Integer
If n = 1 Then
a(1) = 0
max = 2
stepp = 2
ElseIf a(n - 1) = 0 Then
a(n) = 1
max = a(n)
stepp = 1
ElseIf a(n - 1) = 1 Or a(n - 1) = 2 Then
a(n) = 3
max = a(n)
stepp = 1
ElseIf a(n - 1) = 3 Then
a(n) = 0
max = 2
stepp = 2
End If
While a(n) <= max
If n < 16 Then
Call saiki(n + 1)
ElseIf a(16) = 1 Or a(16) = 2 Then
Cells(1, 1).Value = Cells(1, 1).Value + 1
For j = 1 To 16
Cells(Cells(1, 1).Value, j + 1).Value = training(a(j))
Next j
End If
a(n) = a(n) + stepp
Wend
End Sub
Private Function training(ByVal n As Integer)
Select Case n
Case 0
training = "ʢڱư1"
Case 1
training = "ʢڱư2"
Case 2
training = "å"
Case Else
training = "٤"
End Select
End Function
523ڡ 9:05:18 40586
uchinyan
Ϥˤϡơϡ
ࡤؤäݤʤäƤޤޤʴǡ

(ˡ1)
٤ߤϢ³뤳Ȥʤȥ졼˥󥰤θɬΤǡǸθˤ 1 ʬ٤ࡤȹͤС
3 * (ʢڱưβ) + 2 * (åȤβ) = 16 + 1 = 17 ʬ
ǡ
((ʢڱưβ),(åȤβ)) = (5,1)(3,4)(1,7)
ϡʢڱưȥåȤν֤ͤФΤǡ
6!/5!1! + 7!/3!4! + 8!/1!7! = 6 + 35 + 8 = 49 ̤
ˤʤޤ

(ˡ2)
٤ߤϢ³뤳ȤʤǸʳϥȥ졼˥󥰤θɬΤǡ
(n ʬ֤ξ) = (n-3 ʬ֤ξ) + (n-2 ʬ֤ξ)

(3 ʬ֤ξ) = 1(2 ʬ֤ξ) = 1(1 ʬ֤ξ) = 1
ǡʬξɽˤȡ
01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 ... <--- ʬ
01 01 01 02 02 03 04 05 07 09 12 16 21 28 37 49 ... <--- ο
ǡ16 ʬ֤Ǥϡ49 ̤ꡤˤʤޤ
ͥνȡ 523ڡ 13:01:03 40587
uchinyan
ǼĤɤߤޤ
٤ߤμβǾȥ֥뤬ä褦Ǥ͡

#40571#40577#40587(ˡ2)
ˤˡ

#40573#40574#40579#40580#40581#40583#40587(ˡ1)
٤ߤơ3 ʬ 2 ʬ碌 17 ʬˤʤ硤Ϥʾ硤ͤˡ

#40578#40586
ץˤˡ
ͥνȡ 523ڡ 12:01:17 MAIL:uchi@sco.bekkoame.ne.jp 40588
ϥ饮㡼ƥ
ߤޤƤäݤǤ2ΤΤǾʤȤ6ԤʤΤǤȤդǤ
523ڡ 18:16:11 HomePage:湩ؤ˥40589
Ϸʼ
򻻼ˤޤ
ܥᥦܣ
ߣܥܥᣱ
ˤɽ

ʣˡʡˡʡ
ʡˡʡˡʡ
ʡˡʡˡʡ
ʡϻֿǤ
򤯤
ãܣãܣãᣴ
524ʶ 7:57:38 40590
ä
Ƕϥѥɥ˻֤䤤Ƥ뼡ʤΤǡλ֤
524ʶ 8:51:36 40591
ä
Ƕϥѥɥ˻֤䤤Ƥ뼡ʤΤǡλ֤
524ʶ 12:13:39 40592
fumio
̵Ƥޤ45ϸĿŪˤ礳äѤǤϤϤϡ٤Ǥ奪եߺǯڤäǤʽ鼪äꤷơǯڤߤˤƤޤǤϤǤϤޤ͡
527ʷ 5:06:56 40593