ܤǷФƤ룲ΰɮ񤭤ˡϡ
ȤꤵƤУ̤ꡣ
ο޷ϡ
ܤǷФƤΤս
ܤǷФƤΤս
ɾǤΤǡ
ߣߣߣ
45ڡ 0:52:18 39181
abcba@baLLjugglermoka
׻񤭤ޤ36^2+7212+726=2592
ղ꤬Τ25922=5184
45ڡ 1:34:45 39182
ݤ󤭤
ϣְ㤤äƤޤޤ
⡢§򸫤Ĥɤ⡢ʤʤΤ褯狼ʤ
246665184̤
⤦äȹͤޤ
45ڡ 2:34:36 39183
xxx
ƻ˿ޤ
PϽȯ1ܤȿơ줾2٤̲
ؤ2ĤΤȤʸ2̲4ˡ432124̤
ؤ3ĤΤȤʸ4̲8ˡ43^22^21^3144̤
ؤ4ĤΤȤʸ6̲12ˡ43^32^31^5864̤
ؤ5ĤΤȤʸ8̲16ˡ43^42^41^75184̤
45ڡ 3:42:57 39184
Ȼ
ʬ䤷ƿޤ(¦
ߣߣᣵ
45ڡ 7:37:53 39185
kasama
狼ޤǤ(>_<;)
ʤΤǡץǥ顼ѥ夲ޤ
ҡ 45ڡ 8:47:24 39186
ͣ.ǥ
ʤ黲ð³ƤϢ³ڤ줺ˤۤäȤƤޤ
ФФƤ򡢱ȿײνˡᡤ⡤㡤Ȥ
ТУᡤѢТУ㡤ѢС롼ȡʵդˡ12*72*21726̤
ТУᡤѢТУ⡤ѢС롼ȡʵդˡƱͤˡ1728̤
ТУᡤѢТУ⡤ѢС롼ȡʵդˡ432*2*21728̤
äơ1728*35184̤ˤȵޤ
ƤʤˡǤ͡βˡߤٶƤ餤ޤ
45ڡ 9:46:33 39187
uchinyan
Ϥˤϡơϡ
ϡפˡɮ񤭤Ǥ͡
դС֤פʤΤǤޤʴǡ

ޤδ֤ n ܤηϩǷޤ򡤥Ƚ񤯤Ȥˤޤ
㤨Сʬϱߡϱߤľ¤ΡϱߤܤηϩΡʤɤƱǤ
ΰɮ񤭤ϡ餫 n! ̤Ǥ
ơǡ
αߤ鱦üαߤ˹Ԥäϡüαߤΰɮ񤭤򽪤αߤä뤷ޤ
Ʊͤˡαߤ麸üαߤ˹Ԥä⡤üαߤΰɮ񤭤򽪤αߤä뤷ޤ
ơüüαߤϼºݤˤϥƱʤΤǡ鼫Τΰɮ񤭤 3! ̤Ǥ
ǡüüαߡᥢ 3! νŤߤդĤηϩͤС
αߤ 3! νŤդηϩĤäʥˤʤޤ
ꡤޤ򡤤 3! νŤդηϩäĤΥ岼ǤĤʤޤľȤǤޤ
ǡP ϱ¦Υβηϩνޤäˤʤޤ
ơοޤǤϩ̤褦ˡɮ񤭤ͤ뤳Ȥˤʤޤ
ΤȤ3! νŤդηϩ󤷤̤ʤΤǡ
ɮ񤭤ϡ̾ΰɮ񤭤ͤơ 3! * 3! ݤФǤ
ǡοʿޤ P¦Υβΰɮ񤭤ͤޤ
¦Υ麸¦ΥعԤäϡ¦Υΰɮ񤭤򽪤Ʊ¦Υä뤷ʤΤǡ
Ʊ褦ˤơ¦Υ򤽤ΰɮ 3! ̤Ťߤˤϩ֤ȡ
ĤηϩνŤߤ 3! ΰĤΥˡ˿ޤޤ
ϡƱͤˤơ̾ΰɮ񤭤 4! ̤ʤΤǡ˷ϩνŤߤ 3! ݤФǤ
Τ褦ˤơ 3! * 3! ݤơɡ4! * 3! * 3! * 3! = 5184 ̤ꡤˤʤޤ

ϩ˽Ťդ򤷤ʤ֤˿ޤƤޤ
Ƭϡ٤ˡĤȥĤ֤ҤˤʤäޤƤ⤤Ǥ͡
ͥνȡ 45ڡ 12:22:05 39188
uchinyan
ǼĤɤߤޤ
󡤤ʤϫʤäƤ褦ǤºݡΨ⤫ʤ㤤

#39181#39188#39197#39202
ܤǷФƤ룲ο޷ˤȡο޷ϡ
ܤǷФƤΤսȣܤǷФƤΤսꡤѷǤ뤳ȤȤˡ
#39181ľܤˡ#39188#39197ϽŤߤͿʤѷƤޤ

#39182
׻񤭤ޤ36^2+7212+726=2592
ղ꤬Τ25922=5184
Ȥˡܺ٤

#39183
§򸫤ĤƲ򤯲ˡ§θĤξܺ٤

#39184
ؤĤ飵Ĥޤǽ֤Ĵ٤롩ˡ餯餫ε§򸫤ĤƤΤȻפޤ

#39185
ʬ(¦)ƿˡܺ٤Ǥ#39181ʤɤƱʤΤ⡣

#39187
P ФƤ̤ʬषƿˡ

#39191
Ժܴˤˡ

#39192
ؤθ򺹤ʬɮ񤭤򤷤褦ʬΥۤƤǽŪ˰Ĥ礭ؤˡ
Τ褦ʸ򺹤Τۤɮ񤭤λбƤޤλǤϤɤϹͤޤ
ϺǸ 4 ܤͿޤ#39192Ǥ̵¤ 4 ܤƤޤͤƤ⤤Ǥ礦
򺹤ۤ礭ؤäƤݤˡP ۤޤΤȤ P Ĥˤʤޤ
ǡǽŪ礭ؤĤǤȤȤ뤹ˤʤޤ
ΤȤƱäƤؤΰɮ񤭤뤳Ȥա
줾ФؤΤϱȺ 2 ̤ǡ
ɤ饹Ȥ뤷Ƥ⤤Τǡ2 * 2 = 4 ܤ뤳Ȥˤʤޤ

#39198
Ĥؤδܿ޷礷ƽꡣ
Ȥˡܺ٤

#39200
P ǽ˹ԤǾʬƿˡ

#39201
ؤоμǺʬؤΰưλǾʬƿˡ
ɽϤʤ㤤ޤ¤ϡ#39181ʤɤƱʤΤ⡣

#39186#39190
ץˤˡ
ͥνȡ 47ڡ 15:13:19 39189
???
ΥޥǡݤФ
Option Explicit
Dim a(16) As Integer
Sub Macro1()
'_------5--(14)--6--(15)--7--(16)--8------
'_|____/_`______/_`______/_`______/_`____|
'_|___|___|____|___|____|___|____|___|___|
'(4)_(5)_(6)__(7)_(8)__(9)(10)_(11)(12)_(13)
'_|___|___|____|___|____|___|____|___|___|
'_|___`__/_____`__/_____`__/_____`__/____|
'_------1---(1)--2--(2)--P3---(3)--4------
Cells(1, 1).Value = 0
Call saiki(1)
Range("A1").Select
End Sub
Sub saiki(ByVal n As Integer)
Dim QX As Integer
Dim x As Integer
Dim j As Integer
a(n) = 1
While a(n) <= 16
If onaji(n) = 0 Then
If n = 1 Then
QX = -(a(1) = 2 Or a(1) = 3 Or a(1) = 9 Or a(1) = 10)
Else
x = 3
For j = 1 To n - 1
x = s(x, a(j))
Next j
QX = Sgn(s(x, a(n)))
End If
If QX Then
If n < 16 Then
Call saiki(n + 1)
ElseIf s(x, a(16)) = 3 Then
Cells(1, 1).Value = Cells(1, 1).Value + 1
For j = 1 To 16
Cells(Cells(1, 1).Value, j + 1).Value = a(j)
Next j
End If
End If
End If
a(n) = a(n) + 1
Wend
End Sub
Private Function s(ByVal x As Integer, ByVal y As Integer) As Integer
If x = 1 And y = 1 Then
s = 2
ElseIf x = 1 And (y = 4 Or y = 5 Or y = 6) Then
s = 5
ElseIf x = 2 And y = 1 Then
s = 1
ElseIf x = 2 And y = 2 Then
s = 3
ElseIf x = 2 And (y = 7 Or y = 8) Then
s = 6
ElseIf x = 3 And y = 2 Then
s = 2
ElseIf x = 3 And y = 3 Then
s = 4
ElseIf x = 3 And (y = 9 Or y = 10) Then
s = 7
ElseIf x = 4 And y = 3 Then
s = 3
ElseIf x = 4 And (y = 11 Or y = 12 Or y = 13) Then
s = 8
ElseIf x = 5 And (y = 4 Or y = 5 Or y = 6) Then
s = 1
ElseIf x = 5 And y = 14 Then
s = 6
ElseIf x = 6 And (y = 7 Or y = 8) Then
s = 2
ElseIf x = 6 And y = 14 Then
s = 5
ElseIf x = 6 And y = 15 Then
s = 7
ElseIf x = 7 And (y = 9 Or y = 10) Then
s = 3
ElseIf x = 7 And y = 15 Then
s = 6
ElseIf x = 7 And y = 16 Then
s = 8
ElseIf x = 8 And (y = 11 Or y = 12 Or y = 13) Then
s = 4
ElseIf x = 8 And y = 16 Then
s = 7
Else
s = 0
End If
End Function
Private Function onaji(ByVal n As Integer) As Integer
Dim j As Integer
onaji = 0
j = 1
While onaji = 0 And j < n
If a(j) = a(n) Then
onaji = 1
Else
j = j + 1
End If
Wend
End Function
45ڡ 13:13:31 39190
ϺĹ
路ɤ줷ߤޤ
Ф鱦عԤääƤΤ6̤ꡢعԤääƤΤƱ6̤ꡢޤǤϤ˽Фޤ
Ʊͤ˺˹ԤΤ6̤ꡢ˹ԤΤ6̤
ǡ6*6*6*6=1296̤ǡǧڤʤ
ˤϤ⤦ĥ󥰤ä¿ʬ4
ǡ1296*4=5184̤ꡣޤ㤨Ƥ뤫ɤȤޤ
ϳɤǤʬʤٶ뵤ˤʤޤ
䤳ŻŻ
45ڡ 15:28:11 39191
ʥ
ޤϣĤαߤŤʤä֤ͤޤ
ĤαߤǤϸĤǤޤ
줾θ򣲤ĤʬǤƣĤؤˤ뤳Ȥͤޤ
ĤθƻĤʬǤˡϣढΤǡʬǤλϣߣΣѥ󤬹ͤޤ
ΤΣѥؤĤǤƤޤޤ
ʺʬ롣¦¦ʬ롣Ĥαߤʬ
äʬǤλǣѥˤʤޤ
ԥåο޷ϤǤϡĤαߤŤʤʬĤΤ

äƣ̤ؤͤޤPϻϤᣴ̤οʤΤ

Ȥʤޤ
45ڡ 16:01:15 39192
ݤ󤭤
ʥΡäꤷޤ
45ڡ 16:37:49 39193

󡢤狼ʤʥΤġʬǤء
ץ뤽ǡ򤷤
45ڡ 17:31:02 39194
ݤ󤭤
http://uploader.sakura.ne.jp/src/up92475.png
񤤤ƤߤޤʴǤ͡
45ڡ 18:00:53 39195
uchinyan
ʤۤɡʥ򤤡
ͥνȡ 45ڡ 18:35:54 MAIL:uchi@sco.bekkoame.ne.jp 39196
(Keigei)
Ф¦Υ󥰤ϤˡΥ󥰤ȸäƤʬ̤ˡ̤ȹͤޤ
Ф¦Υ󥰤ϤˡΥ󥰤ȸäƤʬ̤ˡ̤ȹͤ
Ĥä󥰤ΤФ¦Υ󥰤ϤˡΥ󥰤ȸäƤʬ̤ˡ򣶡ߣ̤ȹͤޤ
ǸˡĤäĤΥ󥰤̤ˡ !ᣲ̤顢
ߣߣߣᣵ̤Ǥ
45ڡ 19:06:29 39197
X
ʤʤΨ㤤Τ狼ޤ󡣲ˤ֤ʬ餤ǤǤޤ錄ʤϤǤΤˡȤ˺Ƕդä޷狼ʤäꡣĤؤδܿ޷礷ƽꡣ
45ڡ 20:02:14 39198
X
ʤʤΨ㤤Τ狼ޤ󡣲ˤ֤ʬ餤ǤǤޤ錄ʤϤǤΤˡȤ˺Ƕդä޷狼ʤäꡣĤؤδܿ޷礷ƽꡣ
45ڡ 20:02:52 39199
̴
PޤߤθġĴ֤ƻϩοܤġܤġϣܤġPǽưοϣġγơξ׻
ܣܣᣵ
ٻΤ桡 46ʶ 22:53:32 39200

ȺդƤΤϡΡѴƻϩפȲΡBridge ס
Bridge פϤꡢƧˤơѴƻϩפФƱ1296
ƧˤơѴƻϩ׷ͳBridge
ƱƧˤơBridgeפϤꡢ󡢡Ѵƻϩ
3̤3888褿Ȼפ䡢줺
뤫ࡢäѤäƬˤʤꡢ⤦1̤ꡢޤѴƻϩפФơBridgeױ3888+1296ää
47ڡ 6:05:16 MAIL:yasuhirovich@oboe.ocn.ne.jp 39201
Ф
䡣ģؤ󡣤פ֤ꡣ
ܤ⣶ߣߣߣǤ
47ڡ 10:16:44 39202

ڤޤƤޤ

ʥβˡܤ餦Ǥ
ɮ񤭢ʬǤ1Ĥαߤޤ1ܤľѷ

ʲˡ򸫤뤳ȤǤΤǡϳڤ
47ڡ 19:03:22 39203

ڤޤƤޤ

ʥβˡܤ餦Ǥ
ɮ񤭢ʬǤ1Ĥαߤޤ1ܤľѷ

ʲˡ򸫤뤳ȤǤΤǡϳڤ
47ڡ 19:03:44 39204
hide
轵򤱤ʤä

⼫ʬ϶줷ߤޤ
ttp://hidesugar.web.fc2.com/785.gif
ޤΤ褦˽񤭴
öޤϣ¤˹Ԥȡ̲ᤷƤ饨ꥢ(Ǥ¤Ǥʤʬ)ذ֤ʤФʤʤ
ȣ¤Τɤ˹Ԥ̤
Ǥưߣ̤
¤Ǥư̤
ꥢФưϡ㤨У˹ԤʤС֣˹Ԥס֣¤˰ܤס֣¤Ԥäפͤ죳ߣ̤
ޤǤ2592̤ꡣ줺ͤϴְäƤʤϤʤΤǡܤǧڤǻ

­Ƥʤ
ȤƤʤͤйͤۤɤ󤬤餬äƤޤ
ȡࡡ 48 19:55:14 39205

#39205
ƱͤǤˤĤҲ𤵤Ƥޤ(㤨С3918539197
¤Ǥư̤
Ǥưߣ̤ꢪAüBʬ+ܤηףܤƻʤΤ3ܤϤ켫Τˣ̤ƻĤΤ33
ȣ¤Τɤ˹Ԥ̤ פ
䥨ꥢФưפ˲äƹͤȡA,BؤƻP2ܤƻ4ܤƻν֤4
PPABФǤʤP'PAByPAPBPABP⤢
48 23:11:57 39206
X
ФݤƱˡ͡ˤʤäȤǣŤؤꤤǰˤʤޤ
49ʷ 7:56:51 39207
t
ʬȤʬơʬȤ˼ˡοơʬʬˡοơǸˤ٤Ƥ򤫤ޤ׻ˤȡߣߣߣߣǤ
狼ˤǤޤ
49ʷ 17:19:31 39208