ߡ
פκȻפäƼޤ
,פ֤Ǥ
117ڡ 0:05:52 40180
ߤ뤯
ͤʡ
ľŪΩƤΤǥե㡼Ƚ񤤤ȯǤ
117ڡ 0:07:24 40181
Ĺ
ξִפˤʤäƤΤϤɡ
Ϥޤޤġ 117ڡ 0:07:48 HomePage:åλؤ40182
CRYING DOLPHIN
ȴɡʣޤߤޤˡ
ï⤤ʤԳϡ 117ڡ 0:07:55 HomePage:֤⤢40183

1ʤ顢1̤ꡢ2̤ꡣ
NǡM̤ꡢM+1̤ʤ顢
N+1ǡ3M+1̤ꡢ3M+2̤ǡޤ1
ŪǼˡŪʴǤ͡
ܿĻԡ 117ڡ 0:12:15 MAIL:dice-k@onyx.ocn.ne.jp HomePage:40184
tomh
Ǥ͡
ԡ 117ڡ 0:13:43 MAIL:tomh@yahoo.co.jp HomePage:H to M40185
deu
(2-1)^10 Ÿȹͤޤ
117ڡ 0:14:32 40186
ߤ뤯
ϻפĤʤäʤ
117ڡ 0:16:23 40187

Ǥ͡

1nФƤο2^(10-n)*10CnʤΤǷ׻ޤ2952429525ʷ׻ʤƤǤ(
ϵ塡 117ڡ 0:21:05 40188

ǿޤ
󤬣
󤬣
裲롼ס 117ڡ 0:29:29 HomePage:40189
Mr.ǥ
ǣФƤΤθĿAnФƤΤθĿBnȤ
BnAn-12*Bn-1
A2*An-1Bn-1
ä BnAnB-1An-1
ä
B10A10B9A9B8A8ᡦB1A121
Τ褦ˤơǤäƤ⡡ϣ
ʾΤ褦˹ͤޤ
117ڡ 0:32:33 40190

ˤƤ⡢
10C1*2^910C3*2^7ܡ10C9*2

10C0*2^1010C2*2^8ܡ10C10*2^0
äƤΤʬäΤǤ
ѤʤĤʤȤⴶΤǤ
äɤΤפФޤǤ

ǯμƬʤñ˲򤱤ʤȻפ
ǯ֤ǿؤ˺줿ʤȴޤ
ܿĻԡ 117ڡ 0:36:44 MAIL:dice-k@onyx.ocn.ne.jp HomePage:40191
Ȥ
basic
10οabcdefghij,2,3,1θĿs,t,10-s-tȤ
1θĿΤΤݤ3^101θĿΤΤ
κ׻

LET u=0
for a=1 to 3
for b=1 to 3
for c=1 to 3
for d=1 to 3
for e=1 to 3
for f=1 to 3
for g=1 to 3
for h=1 to 3
for i=1 to 3
for j=1 to 3
for s=0 to 10
for t=0 to 10
IF a*b*c*d*e*f*g*h*i*j=2^s*3^t AND MOD(10-s-t,2)<>0 THEN LET u=u+1
10 next t
20 next s
30 NEXT j
40 NEXT i
50 next h
60 next g
70 next f
80 NEXT e
90 next d
100 next c
110 next b
120 next a
PRINT ABS(3^10-2*u)
END

f91()
˭ԡ 117ڡ 1:46:40 40192
ߡ
㤤ĤǤ˹פκͤɡ4444444444ʡ
ޡ
117ڡ 2:02:28 40193
Ȥ
#40193

ץǤޤ
ΤΤι-ΤΤιפ
65612222215661-65607777771217=4444444444
˭ԡ 117ڡ 3:19:00 40194
̴
䡼ޤޥͤΥ桼⥢ȥץæ˹Ǥ
117ڡ 6:33:44 40195
abcba@baLLjugglermoka
ʬιͤDz򤭤ޤ
117ڡ 6:41:59 40196
⡼ޥ
ǽͤ1 or(2,3)Ǿ9¤ӤƱ
ξ¿
117ڡ 8:22:56 40197
ϺĹ
ääīˤɬ˷׻ޤޤ
ϥɥåˡ
10C1*2^910C3*2^7ܡ10C9*2
10C0*2^1010C2*2^8ܡ10C10*2^0
η׻򤷤ޤ
ʤʹȤʤgoogleƤߤޤ
117ڡ 8:30:59 40198
(Keigei)
Σ夬Ʊǡΰ̤ȣΤΤƤĿκѤޤ
ΰ̤ȣΤΤȡΰ̤ΤΤĤޤ
ˡΣ夬Ʊǡΰ̤ȣΤΤƤĿκѤޤ
ΰ̤ȣΤΤȡ夬ΤΤĤޤ
ˡΣ夬Ʊǡɴΰ̤ȣΤΤƤĿκѤޤ
ɴΰ̤ȣΤΤȡ夬ΤΤĤޤ
򷫤֤СĤꡢĤ¿Ȥʬޤ
117ڡ 9:29:47 40199
???
Option Explicit
Dim a(10) As Integer
Sub Macro1()
Sheets("Sheet1").Select
Cells(1, 1).Value = 0
Cells(1, 2).Value = 0
Cells(1, 3).Value = "=ABS(A1-B1)"
Range("C1").Select
Call saiki(1)
End Sub
Sub saiki(ByVal n As Integer)
Dim j As Integer
Dim k As Integer
a(n) = 1
While a(n) <= 3
If n < 10 Then
Call saiki(n + 1)
Else
k = 0
For j = 1 To 10
k = k - (a(j) = 1)
Next j
j = 2 - (k Mod 2)
Cells(1, j).Value = Cells(1, j).Value + 1
End If
a(n) = a(n) + 1
Wend
End Sub
117ڡ 10:10:12 40201
uchinyan
Ϥˤϡơϡ
ͤƤʤʤ򤤤Ǥɤ⾯ؤäݤʤäƤޤޤ͡
ȤƤϡ(ˡ1)ƻ˴ĥ뤫(ˡ2)פ뤫(ˡ3)ʡ

(ˡ1)ХХοءºݤ˷׻л
n ξ硤
(n 1 ) = nC0 * 2^n + nC2 * 2^(n-2) + + nCn * 2^0
(n 1 ) = nC1 * 2^(n-1) + nC3 * 2^(n-3) + + nC(n-1) * 2^1
(n 1 ) - (n 1 )
= (nC0 * 2^n + nC2 * 2^(n-2) + + nCn * 2^0) - (nC1 * 2^(n-1) + nC3 * 2^(n-3) + + nC(n-1) * 2^1)
= nC0 * 2^n * (-1)^0 + nC1 * 2^(n-1) * (-1)^1 + nC2 * 2^(n-2) * (-1)^2 + nC3 * 2^(n-3) * (-1)^3 +
+ nC(n-1) * 2^1 * (-1)^(n-1) + nCn * 2^0 * (-1)^n
= (2 - 1)^n = 1^n = 1
n ξ硤
(n 1 ) = nC0 * 2^n + nC2 * 2^(n-2) + + nC(n-1) * 2^1
(n 1 ) = nC1 * 2^(n-1) + nC3 * 2^(n-3) + + nCn * 2^0
(n 1 ) - (n 1 )
= (nC0 * 2^n + nC2 * 2^(n-2) + + nC(n-1) * 2^1) - (nC1 * 2^(n-1) + nC3 * 2^(n-3) + + nCn * 2^0)
= nC0 * 2^n * (-1)^0 + nC1 * 2^(n-1) * (-1)^1 + nC2 * 2^(n-2) * (-1)^2 + nC3 * 2^(n-3) * (-1)^3 +
+ nC(n-1) * 2^1 * (-1)^(n-1) + nCn * 2^0 * (-1)^n
= (2 - 1)^n = 1^n = 1
ɡn ǤǤ⡤ 1Ǥ͡
Ǥ n = 10 Ǥ1 Ǥ

ʤ(ˡ1)ǻȤƤϡn = 10 ξºݤ˷׻ơ
= (10 1 ) = 10C0 * 2^10 + 10C2 * 2^8 + 10C4 * 2^6 + 10C6 * 2^4 + 10C8 * 2^2 + 10C10 * 2^0
= 1 * 1024 + 45 * 256 + 210 * 64 + 210 * 16 + 45 * 4 + 1 * 1
= 1024 + 11520 + 13440 + 3360 + 180 + 1
= 29525
= (10 1 ) = 10C1 * 2^9 + 10C3 * 2^7 + 10C5 * 2^5 + 10C7 * 2^3 + 10C9 * 2^1
= 10 * 512 + 120 * 128 + 252 * 32 + 120 * 8 + 10 * 2
= 5120 + 15360 + 8064 + 960 + 20
= 29524
( κ) = - = 29525 - 29524 = 1
ˤʤޤ

(ˡ2)ǻʡ
n ξˤ n+1 ξͤȡ
(n+1 1 ) = (n 1 ) * 2 + (n 1 ) * 1
(n+1 1 ) = (n 1 ) * 1 + (n 1 ) * 2
(1 1 ) = 1(1 1 ) = 2Ǥ
ǡ
(n+1 1 ) - (n+1 1 ) = (n 1 ) - (n 1 )
= = (1 1 ) - (1 1 ) = 2 - 1 = 1

( κ) = (10 1 ) - (10 1 ) = 1
ˤʤޤ

(ˡ3)б¿ʬϻ
n ξǡ n-1 夬Ʊ n ܤ 1 2 ȰۤʤĤοϡ
1 βζۤʤꡤбΤƱĤꡤĿκȡǤää 0 ˤʤޤ
äơn ܤ 3 οĤޤ
λĤäФơ٤ϡ n-2 夬Ʊ n-1 ܤ 1 2 ȰۤʤĤοϡ
1 βζۤʤꡤбΤƱĤꡤĿκȡǤää 0 ˤʤޤ
äơn-1 ܤ 3 οĤޤ
ޤǤǡn ܤ 3n-1 ܤ 3οĤäƤޤ
1 ܤޤǷ֤ȡƷ夬٤ 3 333333 Ȥ n οĤޤ
1 β 0 ĤʤΤǡɡ
(n 1 ) - (n 1 ) = 1
Ǥ
Ǥ n = 10 Ǥ1 ˤʤޤ

(ˡ3)Σб 1 3 Ǥ褯ξ 222222 Ȥ n οĤޤ
ĿκƱǡϤ 1 Ǥ
ͥνȡ 117ڡ 13:13:57 MAIL:uchi@sco.bekkoame.ne.jp 40202
uchinyan
ǼĤɤߤޤ
ɤ顤󡤤ۤȤɤؤιΤˡΤ褦Ǥ

#40181#40190#40202(ˡ2)
ˤˡ

#40184
οŪǼˡˤˡ¼Ѥˡ˶᤽˻פޤ

#40185#40186#40196#40202(ˡ1)Ⱦ
ˤˡ

#40188#40189#40191#40198#40202(ˡ1)θȾ
1 1 󡤤ºݤ˷׻Ƶˡ

#40197#40199#40202(ˡ3)
бˤˡ

#40192#40201
ץˤˡ

ʤ

#40193
䴪㤤ĤǤ˹פκͤɡ4444444444ʡ
#40194
ץǤޤ
ΤΤι-ΤΤιפ
65612222215661-65607777771217=4444444444
η̤ϡб˹ͤ餫Ǥ͡
ͥνȡ 117ڡ 15:39:52 MAIL:uchi@sco.bekkoame.ne.jp 40203

ֺϤĤǤ礦פȡɤ餫ɤȸ̩˵ꤷƤʤʤΤϣǼĽ졦ɼºݤ˷׻ְ㤤ΡǤǽΤҤ᤭Ϥ¤ʤȤ̤ܤƤΤǤɤϼʬ餷̤ˤʤޤ
117ڡ 16:36:09 40204
Ƥ

(1-x)^10, x=2
117ڡ 17:18:30 40205

Ϥޤơ
Ǥʤ¤ǤС3^10ȤΤϤ狼ޤ줬ʤǤ͡
ƤȤϡġ
119ڡ 0:03:04 40206
ߤ뤯
http://www.sansu.org/kakomon/toi105.html
ǯΰܤ11֤꤬1998ǯ˻ǤǤƤǤ
119ڡ 22:25:15 40207