ǯ
ʤʤ줺ϤᤫƤޤ
ȿʬơ夲ޤ
0Ȥξ11Ȥξ92Ȥξ283Ȥξ354Ȥξ155Ȥξ1
åˡϤäͤޤ
1210ڡ 0:52:57 43953
Mr.ǥ
ֲս꤬9սꤢꡢ򺸤19εդ
19顡Ĥ0ޤϢ³ʤ褦ӽФοͤޤ
0Ĥ־.....1̤
1Ĥ־.....9̤
Ĥ־
...7ĤΡδ֤ξü8սˡ2ĤΡ򣱤ĤοƱǡ8C228(̤
Ʊͤˤ
Ĥ־ο7C335(̤
4Ĥ־ο6C4=15(̤
5Ĥ־ο5C51(̤
ä
1+9+28+35+15+189̤......Ȥޤ
ʤäȥޡȤʲˡꤽ
1210ڡ 0:53:18 43954
CRYING DOLPHIN
9ĤΡִ֡פˤơФʤս0١Ƿֲս1٤ȤС
0Ϣ³Ƥ褤1Ϣ³ƤϤʤäƥեܥʥå

Ĥȹͤޤָܤۤʤ֡פ顢žƽŤʤΤƱ
(̾դƤΤǡžƽŤʤΤۤʤȤƹͤޤ)
ï⤤ʤԳϡ 1210ڡ 0:57:02 HomePage:֥⤢롣43955

Ф
nĤ¤֤Ȥ
nܤʬǷФƤοa_n̤ꡢ
ʬǷФƤʤοb_n̤Ȥ
a_2=1, b_2=1,
a_(n+1)=b_n
b_(n+1)=a_n+b_n

n2345678910
a112358132134
b1235813213455
äơa_10+b_10=34+55=89̤
Ȥޤ
äĤ䤹ʡ
夲᡹ǰޤ(^^;

1210ڡ 1:00:32 43956
٥륯åĥ
0ܢ1̤ꡢ1ܢ9̤ꡢ2ܢ7+6+5+4+3+2+128̤ꡢ5ܢ1̤ϴñ˽ФΤǡʳ
ǽ˹ͤˡϡȶʬ3ܤʤ֤ζ2ɬסĤζ4ɤ֤ͤ28̤ꡢΤ褦˽Фޤ
ʤߤ˻4ܤΤȤ׻ߥƤƤʤ̵֤̤ˤƤޤޤ
1210ڡ 1:07:36 43957
kyorofumi
adding a dot to n-1th or adding a bar with two dots to n-2th
Pn = Pn-1 + Pn-2
1210ڡ 1:05:29 43958
⡼ޥ
Mr.ǥƱȤǤ^^
0ġ1
1ġ9
2ġx(0)(x)(0)xx3Ĥ(9-3)֡3H6=8C2
3ġx0x0x0x4H4=7C3
4ġx0x0x0x0x5H2=6C2
5ġ0x0x0x0x01
ǡOrz

^^;
¨ ^^;v 1210ڡ 1:09:17 43959
٥륯åĥ
ְ̲㤨ƤΤǽľ
3ܤʤ10-324Ω4ġ
η7ĤΤսˤΤǡ(765)/(321)35̤ꡣ
ʴǡ
1210ڡ 1:10:22 43960
Mr.ǥ
ƹͤ
ĤΤΤϢ³ʤΤӽФοAnȤ
A12A2=3
An+2=An+1+An Ȥʤեܥʥåˤʤޤ͡
A3=5,A4=8A5=13,A6=21,A7=34,A8=55A9=89

κ֤ۡΤȤޤ
1ܤξ....θϤɤ餫ϤޤäƤ褯An+1̤
1ܤξ磲ܤϡܤϲϤޤäƤΤǡAnʡ̤ˤä
An+2An+1An

ʤ⥿ץߥ򤷤ƤΤޤ
uchinyan󡢽ŤͤƤΤŦ꤬Ȥޤ
1211ʶ 14:22:15 43961
ֿء׾ι
ץहƱ褦ʴǤ
ϥ֥åȤΥץꡢ£ӣɣäȤäƤߤޤ
for a=0 to 1
for b=0 to 1
for c=0 to 1
for d=0 to 1
for e=0 to 1
for f=0 to 1
for g=0 to 1
for h=0 to 1
for i=0 to 1
if (a*b-1)*(b*c-1)*(c*d-1)*(d*e-1)*(e*f-1)*(f*g-1)*(g*h-1)*(h*i-1)<>0 then
s=s+1
endif
next a
next b
next c
next d
next e
next f
next g
next h
next i
print s

ʾǤ
1210ڡ 5:16:35 43962
ϥ饮㡼ƥ
Ϥ褦ޤǧǤץ
ͤͽǤ
1210ڡ 6:46:18 HomePage:湩ؤ˥43963

᤮󤫹򤵤ȡä餤δ֤ˣͤ͡ȿͿƤơʼʬ⤽ΰͤʤΤˡˤ餿ƤʤϷޡʡˤʤѤʤȤ˴ơɿƤޤޤ
¿񤫤ƤޤȻĤ¤٤륤᡼ǣãܣãܣãܣãܣãܣãᣱܣܣܣܣܣ᣸Ǥ
餷ΤϡФʤΣ̤˺Ƥƣǽ졢֤äΤǤ
Ϻꡡ 1210ڡ 6:51:02 43964
ǯ
ö񤭹Ǥ顢ϤˤĤʤäȡ2ȤͤΤǤǤ˳󤬽񤭹ޤƤޤ
#43955CRYING DOLPHINΤ褦ˤϹͤ줺#43956ʥޥޤƱǤ
⤦Ĥϡ#43959⡼ޥ󤵤Ʊ褦ˡȤȷ֤ߤ¤٤ƤơĤη֤Ȥδ֤ξ¦֤ˡǤ
ʲȤΤϤ⤷Ǥ͡
1210ڡ 8:36:19 43965
???
Option Explicit
Dim a(5) As Integer, n As Integer
Sub Macro1()
Cells(1, 1).Value = 1
For n = 1 To 5
Call saiki(1)
Next n
End Sub
Sub saiki(ByVal m As Integer)
Dim j As Integer
If m = 1 Then
a(1) = 1
Else
a(m) = a(m - 1) + 2
End If
While a(m) <= 9
If m < n Then
Call saiki(m + 1)
Else
Cells(1, 1).Value = Cells(1, 1).Value + 1
For j = 1 To n
Cells(Cells(1, 1).Value, j + 1).Value = sembun(a(j))
Next j
End If
a(m) = a(m) + 1
Wend
End Sub
Private Function sembun(ByVal m As Integer) As String
Select Case m
Case 1 : sembun = ""
Case 2 : sembun = ""
Case 3 : sembun = ""
Case 4 : sembun = ""
Case 5 : sembun = ""
Case 6 : sembun = ""
Case 7 : sembun = ""
Case 8 : sembun = ""
Case Else : sembun = ""
End Select
End Function
1210ڡ 9:00:45 43966
̴
ФʤȤɤȤΤϡɤǤȤƬˤäΤǤ񤭽ФˤϤä˺ƤꡢäȣDzܤʤΤȡ
ٻΤ桡 1210ڡ 9:01:16 43967
Mr.ǥ
10ʾ볬ʤˤơʤΤܤ뤫1ʤȤФǾ뤫ΤȤեܥʥåɽˤʤΤǤ
ΤȤˡǤȤФ줿ʤȡΤĤʤսбƱȤˤʤޤ͡
ʤߤˡʬĹ3ʾˤʤ뤳ȤϤʤĤʤפȤʤ
An+3An+2An+1An ȤˤʤΤǤ礦
uchinyanΤŦˤꡢץߥƤ餤ޤ
1210ڡ 14:50:54 43968
Ȥ
basic
=a,=b,=c,=d,=e,=f,=g,=h,=i
0ĤʤäƤʤ,1ĤʤäƤȤ

for a=0 to 1
for b=0 to 1
if a+b=2 then goto 80
for c=0 to 1
if b+c=2 then goto 70
for d=0 to 1
if c+d=2 then goto 60
for e=0 to 1
if d+e=2 then goto 50
for f=0 to 1
if e+f=2 then goto 40
for g=0 to 1
if f+g=2 then goto 30
for h=0 to 1
if g+h=2 then goto 20
for i=0 to 1
if h+i=2 then goto 10
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ơ89()
˭ԡ 1210ڡ 12:22:43 MAIL:fttnm528@ybb.ne.jp 43969
uchinyan
Ϥˤϡơϡ
ϰܸƥեܥʥåȵդޤ
10 ФˤʺߤƳʤȤߤʤĽʤȤФȤߤʤСեܥʥåΤ褯Τ줿ʾˤʤ뤫Ǥ
ȤƤɸŪסɤ餫ȤаפʡȤޤ
ȤƤϡʴǡ

(ˡ1)˾äΤǽޤ
10 η 9 սΤ ĽȤޤ = 0, 1, 2, 3, 4, 5Ǥ
= 1 5 ξϡδ֤˾ʤȤ⣱Τʤ֤ɬפǡ줬 - 1 Ľˤʤꡤ
ɡ9 - ( - 1) = 10 - Ľ꤫ Ľ֤Ȥˤʤꡤ(10 - )C ̤ꡤǤ
= 0Ĥޤʤϡ餫 1 ̤Ǥ10C0 = 1 ʤΤǾ嵭˴ޤ뤳ȤǤޤ
ǡ = 0 5 Ȥơ
10C0 + 9C1 + 8C2 + 7C3 + 6C4 + 5C5 = 1 + 9 + 28 + 35 + 15 + 1 = 89 ̤ꡤ
ˤʤޤ

(ˡ2)
10 ξο A10 ̤Ȥޤϡ
9 ܤ 10 ܤδ֤ʤ硤9 ܤ꺸ΰA9 ̤ꡤ
9 ܤ 10 ܤδ֤硤8 ܤ 9 ܤδ֤ˤʤΤǡ8 ܤ꺸ΰA8 ̤ꡤ
ȤʤäơA10 = A9 + A8ǤơA9A8ƱͤμA3 = 3A2 = 2ʤΤǡ
A4 = A3 + A2 = 5A5 = A4 + A3 = 8A6 = A5 + A4 = 13A7 = A6 + A5 = 21A8 = A7 + A6 = 34A9 = A8 + A7 = 55A10 = A9 + A8 = 89
ǡA10 οʤΤǡ89 ̤ꡤˤʤޤ

եܥʥå͡ʤȤ˸ޤ줾줽ʤξβǤΡʾꡤߤɽࡤʤɡ
ŵФƤȡܤDz򤱤⤢Ȼפޤ
ͥνȡ 1211ʶ 11:28:09 43970
uchinyan
ǼĤɤߤޤ


ʲεҤϡ⤽ϻ伫ȤٶΥ˲᤮ʤΤǤ
޳ѤʤΤǤͤޤǤˤȻפäƸΤǤ
Ȥ⤢äơˡʬϻ F.A.Q. ΡֻϰϡפεҤ򻲹ͤˡ
ĿͤǤиǼŪ˹ԤäƤΤǤäơҴŪʤΤǤϤޤ
ޤǤ⤴ͤǤ餺

#43953#43954#43957#43960#43959#43964#43965Σܡ#43970(ˡ1)
ܿǾʬƹͤˡ

#43955
ФʤΤ 0֤Τ 1Ȥ¤ӤȤƹͤˡ

#43956#43958#43961#43965Σܡ#43970(ˡ2)
ݤͤˡ

#43962#43966#43969
ץˤˡ

#43963
ǧڤˤˡ (^^;

ʤ
#43968
ʤߤˡʬĹ3ʾˤʤ뤳ȤϤʤĤʤפȤʤ
An+1An+1An ȤˤʤΤǤ礦
⤽⼰Ǥ
An+3 = An+2 + An+1 + AnΥȥܥʥåǤϡ
θ塤ޤ͡
ͥνȡ 1211ʶ 11:30:28 43971
Mr.ǥ
uchinyan#43971Ŧ꤬Ȥޤ
ʤߤˡʬĹ3ʾˤʤ뤳ȤϤʤĤʤפȤʤȡ
An+3 = An+2 + An+1 + AnΥȥܥʥåǤϡ
̤ǡľƤӤäꡪ
ȥܥʥåμ񤤤Ĥ꤬ ˼ǤǡȤǤʤˤʤä
ޤäƤޤ
1210ڡ 18:57:31 43972
̴
uchinyan
ʬ䤹⡢ɤ⤢꤬Ȥޤ
ʤۤɤɤߤʤٶƤޤä˺Ρ43970β
Ǥ͡Ȥ³ĺ뤳ȤǰƤޤ
ٻΤ桡 1211ʶ 8:08:55 43973
uchinyan
#43972Mr.ǥ
򤢤꤬Ȥޤ
ĤǤȸäƤϲǤ¤ϡϤ˵դΤǻŦʤäΤǤ
#43961κǸ塤
An+2An+An
⡤An+2 = An+1 + Anν񤭴ְ㤤Ǥ͡
ͥνȡ 1211ʶ 11:44:56 MAIL:uchi@sco.bekkoame.ne.jp 43974
uchinyan
#43973̴
˫Τդ򤢤꤬Ȥޤ

޳ѤΤդʤ顤#43970(ˡ1)ޤ
= 0 ξ硤 - 1 սϰ̣ʤʤΤ̰ɬפǤ
10 ʤγʾ֤ƤޤФ⤦ޤΤǤ
ʤʤ񤷤Ǥ˹ͤΤ⤢꤫ʡȻפäƤޤ

10 η 9 սΤ ĽȤޤ = 0 5Ǥ
ΤȤˤƤޤȹͤޤȡ10 - ˤʤޤ
դˡ10 - 򤽤줾죲˰Фδ֤Ȥդޤ
Ĥޤꡤˤꡤդξ10 - ֤ȤϣУбޤ
ǡΤ Ľξοϡ(10 - )C ̤ꡤǤ
ꡤ = 0 5 ʤΤǡ
ο = 10C0 + 9C1 + 8C2 + 7C3 + 6C4 + 5C5 = 1 + 9 + 28 + 35 + 15 + 1 = 89 ̤ꡤ
ˤʤޤ
ͥνȡ 1211ʶ 13:14:49 43975
ߤ
ĤȤ
ʤ˱飲ܤȱü־
ʤ˱飲ܤȱüФʤ
ͤ롣

ʣ+˸ĤȤ
ʤˤξοĤλΡʤˤξο
ʤˤξοĤλΡʤˤξοܣĤλΡʤˤξο
ιס

Ĥλ
ʤˤξοᣱʤˤξοᣱǤ
ʹߤϽ֤˷׻ƤФ褤

󡢿ؤäΤäݤʤ
1211ʶ 17:42:10 43976
miraru
ϿǤǤŪñǤ
ͤˤǤƤ褫äǤ
1211ʶ 20:57:56 43977
ʪ
ץߥ󥰤Dz򤭤ޤ
Dz򤳤Ȼߤޤȴޤޤ(^_^;)
1212ڡ 3:18:22 MAIL:butsuri.0523@gmail.com HomePage:twitter43978
̴
uchinyan
= 0 ξäɤ⤢꤬Ȥޤ
äͤˡβǤ̷⤬ޤФʤ
ΤDz鵿ˤⴶޤǤԤǤ
uchinyanͤ餷Ǥ͡ʤͤʹͤ⤢Τ
ޤ
ٻΤ桡 1212ڡ 19:57:54 43979
fumio
Ϥ褦ޤפ֤Ǥ
ޡǤ
ǯ⤦鷺Ǥ͡٤ҤʤǴĥޤϤϤϡ
եܥʥå¡1Ǥ줤˲򤱤Ǥ͡
餷ǤϤǤϤޤ͡
1213 5:57:35 43980