٥륯åĥ
٤礦ؤȤκ9ޤϤθ0¤٤
199229993Ȥʤ롣
111ܿʤ37ܿˤʤΤǡ999999999ˤʤ礽줾6̤3̤ǹ碌9̤Ǥ
625ڡ 0:08:21 49272
鯤ο
2a,b(a<b)Ȥȡ

d(a-b)*10^(9-b)*(10^(b-a)-1)


d37dzڤ
(10^(b-a)-1)37dzڤ롣

10^(b-a)-1ϡdzڤΤǡ
10^(b-a)-1111dzڤb-aõФ褤

1b-a8ʤΤǡ
b-a36λΩġ(999999999)

b-a=3ΤȤ(a,b)Ȥ߹碌6̤
b-a=6ΤȤ(a,b)Ȥ߹碌3̤

äơ碌ơ9̤ꡣ
//

625ڡ 0:15:57 49273
10̤Ǥϡ
(1,4)(1,7)(1,8)(2,5)(2,8)(3,6)(3,9)(4,7)(5,8)(6,9)
625ڡ 0:30:15 49274
ְ㤨ޤ
(1,8)ϰ㤤ޤ͡׻ߥƤޤޤ
625ڡ 0:36:15 49275
⡼ޥ
ƱǤ ^^
a<b
10^(9-a)-10^(9-b)
37*3=111 ʤΤǡ
9-a=8,7,6,5,4,3 줾Ф...
9-b=(5,2),(4,1).(3,0),(2),(1),(0)
Σ̤
625ڡ 0:40:35 49276
SECOND
! C(9,2) ׻

DIM a(9)
MAT READ a
DATA 1,2,3,4,5,6,7,8,9
CALL comb20(1,1)

SUB comb20(k,p)
local i
IF k<=2 THEN
FOR i=p TO 9
swap a(k),a(i)
CALL comb20(k+1,i+1)
swap a(k),a(i)
NEXT i
ELSE !--- ġȹ礻 C(9,2) ---
LET x$="123456789"
LET x$(a(1):a(1))=STR$(a(2)) !x$ a(1)֤a(2)֤οȤ꤫
LET x$(a(2):a(2))=STR$(a(1))
IF MOD( VAL(x$)-123456789, 37)=0 THEN PRINT "! ";x$
END IF
END SUB
625ڡ 1:09:33 49277
SECOND
#49277 ɵդʤΤǿʤŤͤơֽBASICפǤĤǤˡ
!<¹Է>
! 423156789
! 723456189
! 153426789
! 183456729
! 126453789
! 129456783
! 123756489
! 123486759
! 123459786
625ڡ 1:49:11 49278
ֿء׾ι
10^3-1 ȡ10^6-1ܿˤʤ뤳Ȥޤ

625ڡ 6:23:10 49279
ˤ
m>nȤơ(m-n)*(10^(m-n)-1)*10^9-m37ǿʤΤǡ
ɡֿء׾ιԤƱ10^3-110^6-137ܿ
ʤ뤳Ȥޤ
Ķļˡ 625ڡ 6:39:57 HomePage:ޤޤ49280
ˤ
10^9-m -> 10^(9-m)
Ķļˡ 625ڡ 6:43:19 HomePage:ޤޤ49281
̴
#49272 ٥륯åĥ
ؤκʤɤȤޤǤʬä
ΤǤ̣äΤǤ͡
äǼǤޤ
ٻΤ桡 625ڡ 7:48:45 49282
ϥ饮㡼ƥ
ץǤ

ˤȤäƤϳڤǤ
ԡ 625ڡ 9:16:12 HomePage:湩ؤ˥49283
Ѥ
29975999994λ37dzڤΤ
25ο6+3=9ȤƤߤޤ
625ڡ 12:16:17 49284
ˤ⡼
ؤΥƤ뤫ΥƤȤ߹碌ǣ̤

ޤ¤45ǤΤǣܿ
ֿפȡ֣ءפϤ⣳ܿ顢⣳ܿ
37ܿõȤȤϡ111ܿõȤˤʤ롣

Υ줿֤ˤäơ׻̤ˤϰʲΤ褦ʿƬ˽ФƤơʾ³ˤʤ롣
Υ줿Τ֣
Υ줿Τ198
Υ줿Τ2997
ʲ39996ס499995ס5999994ס69999993ס799999992
嵭ο111dz򸫤Ĥ
2997סֿΥ줿Ρ
5999994סʣΥ줿ΡˤǻϤޤǡ줾죶̤ȣ̤
碌ƣ̤

졢2016ǯܭǤ͡
¡ 625ڡ 19:35:18 HomePage:˥ͥäΥڡ49285
ֿء׾ι
ץ򤽤ǤRubyǤ

p [1,2,3,4,5,6,7,8,9].combination(2).to_a.select{|r|((r[1]-r[0])*10**(9-r[0])+(r[0]-r[1])*10**(9-r[1]))%37==0}.size
625ڡ 21:23:31 49286
ե󥿥
˾عäΤ2330ʬ餤˿Ƥޤޤ
򤯤Τ1֤餤ޤ
줬꤫ġή
625ڡ 22:46:32 49287
鯤ο
#49287

>줬꤫ġή

⡢ϡȤƤϡ乽ΣܤΥҥȤȤƣܤˡ꤬֤Ƥ櫓ǡޤ褬櫓Ǥ
626ʶ 18:25:13 49288
Mr.ǥ
ؤ2κAΤȤ
ؤ2Ĥδ(üޤ)ͤФ褤
ȡϡʤηǡ˸
(A-1)999(10-A) 9ϡA-1ġˤȤʤ
(A-1)10^A9999(A-1) .........9A
(A-)x(10^A101+9999 .........9A
Ax9999
ä
9999(A)37ܿˤʤФ褤...
37dzڤΤϡA(ˤ3,6ξΤߤǢ̤
626ʶ 19:48:35 49289
ˤ⡼
#49287 #49288
ͤޤǤˡ䣳ĤΤΡʣˡʣˤܤƤޤ
ºݤνɽϤۤʤޤμݤƱǤ

ʣ˿鸵ؤ׻̡ʺˤ1000dzڤޤ
Τ褦ʷ̤ˤʤ룲Ĥοϡ̤ꤢǤ礦

ʣ˹ͤ뤹٤Ƥη׻̡ʺˤ36̤ˤʤޤ
򤹤٤Ƥݤ碌顢Ǻ粿ڤޤ
㡧ϣǣڤޤ
¡ 626ʶ 22:21:27 HomePage:˥ͥäΥڡ49290
tomato
37dzڤȤΤȤǤΤǡ37ܿͤȡ3727=999Τǡܤޤ
21-12=9=91
321-123=198=992
4321-1234=2997=9993
54321-12345=39996=99994 Ȥʤ뤳Ȥ顢
2ĤοκnȤȡX鿷̤ͤ
nο9¤nȤʤޤ
ꡢͤΤ37dzڤΤϡ999dzڤΤȤʤޤ
äơ99939999996ޤ
ͤˤʤ뤿ˤϡn=3뤤n=6ɬפޤ
Ȥ߹碌ϡ
1-4,1-7,2-5,2-8,3-6,3-9,4-7,5-8,6-9 6Ĥˤʤޤ
äơ 6 Ȥʤޤ

626ʶ 23:16:09 49291
tomato
#49291 Ȥ߹碌ο񤭴ְ㤨Ƥޤ
Ȥ߹碌ο9Ĥǡ9Ǥ
Ѽפޤ
626ʶ 23:30:07 49292
ޤ
ʤEXCELΤǤorz
somewhere in the world 627ڡ 0:51:13 49293
???
VBSCRIPT
k=0:kotae=""
for a=1 to 9-1
for b=a+1 to 9
n=0
for j=1 to 9
n=n*10-b*(j=a)-a*(j=b)-j*(j<>a and j<>b)
next
if (n-123456789) mod 37=0 then
k=k+1
if k>0 then kotae=kotae&chr(13)
kotae=kotae&k&":"&n
end if
next:next
msgbox kotae
627ڡ 8:53:20 49294
S
#49287
줬꤫ġή
627ڡ 12:08:19 49295
ޤ
#49288
>>줬꤫ġή

>⡢ϡȤƤϡ乽ΣܤΥҥȤȤƣܤˡ꤬֤Ƥ櫓ǡޤ褬櫓Ǥ

10ޤѤäƤ⡢˼褦ʥˤŨʤorz
somewhere in the world 628 13:22:24 49296
ޤ륱
ޥ뤵󡢤ǤȤޤ
Τ˻˥졼˻ǤɡΤ˵դƴĥäƤ
630ʲС 13:15:48 49297
ե󥿥
#49297
ޥ뤵ǤȤޤ
630ʲС 20:58:08 49298
S
ޥ뤵ͤβƱʤǤ͡
71ʿ 16:34:35 49299
ޥ
󤢤꤬ȤޤĤ50ФãƤޤޤ
MBP 71ʿ 23:41:39 HomePage:49300