٥륯åĥ
2100223557
θϾۤ124714
θϾۤ135715
ǰʬ򤷤227ޤǤꡢ35Τǥ35ϤʤȤ狼ꡢ28Ȥʤޤ
317ڡ 0:08:00 51362
鯤ο
꤬ȤʤΤǡޥۤɤǰŵƿʤͤ򤱤ΤDzޤͤ#51362ƱǤ
317ڡ 0:49:09 51363
٥륯åĥ
äϿ̡ɤ줬ʤĹ³Ƥޤ
ΤȤﳲϽФƤޤ󤬡ߤʤפǤ礦
317ڡ 1:00:48 51364
Ȥ
ʲ2̤ǡ

=28,=2100,=105
=28,=2100,=525
˭ԡ 317ڡ 1:34:25 MAIL:fttnm528@ybb.ne.jp 51365
ǯ
1415פȤꡣ
ϫĤ餺
15ϥפȵŤޤǤˡʤλ֤䤷
2100=2*2*3*5*5*7
θܿ14ޤΤǰ2,7
θܿ15ޤΤǰ3,5
3,7ޤ
2.3.5ξ硧1,2,3,5,6,10,15,30.....
2,5,7ξ硧1,2,5,7,10,14,35,70.....
145ܤˤʤʤʤΤǡϡǰ3,5äƤϤʤʤ
ϡ2*7뤤2*2*72*7Ǥ4ĤʤΤ5ܤϤʤ
Τˡ2*2*728

317ڡ 1:38:06 51366

#51365Ȥ
>ʲ2̤ǡ

>=28,=2100,=105
>=28,=2100,=525

ȡ=28,=420,=525
⤢ޤǤ礦
317ڡ 2:01:42 51367
Ȥ
#51367
MaximadzΤȳΤˤޤ͡ߤޤ
1,3,5,10,15ǡ

divisors( 28 );divisors( 420 );divisors( 150 );
{1, 2, 4, 7, 14, 28}
{1, 2, 3, 4, 5, 6, 7, 10, 12, 14, 15, 20, 21, 28, 30, 35, 42, 60, 70,
84, 105, 140, 210, 420}
{1, 2, 3, 5, 6, 10, 15, 25, 30, 50, 75, 150}

¾ˤϤʤǤ礦?
˭ԡ 317ڡ 2:10:12 MAIL:fttnm528@ybb.ne.jp 51368
Ȥ
#51367
#51368
ߤޤְ㤨Ƥޤä
=28,=420,=1501,2,3,5,10,156ܤܤǤ!!
=28,=420,=525 3̤ꤷʤ褦Ǥ͡
˭ԡ 317ڡ 2:26:26 MAIL:fttnm528@ybb.ne.jp 51369
ֿء׾ι
3*7*4*25ǤΤǤõäƤߤޤ
317ڡ 4:35:51 51370
ֿء׾ι
ӡǤäƤߤȡ
#ؿ
def me(i)
m=[]
1.upto(i){|x|if i%x==0 then m.push x end}
m
end

#οθ򤽤줾a,b,cȤơ
a=me(3*2*5**2).map{|x|x*14}
b=me(2*5).map{|x|x*14*15}
c=me(7*2**2*5).map{|x|x*15}
#ȥθΣܤ14ˤʤΤ
a.each{|x|b.each{|y|me(x).intersection(me(y))[4]==14?(p x,y):0}}
#ȥθ5ܤ15ˤʤΤ
b.each{|x|c.each{|y|me(x).intersection(me(y))[4]==15?(p x,y):0}}

ǡΤ褦ˤʤޤ
Ȥ
28,42028,2100
Ȥ
210,105 210,525 420,105 420,525 1050,105 1050,525 2100,105 2100,525

áȥθ155ܤȤ郎פʤ⡩
ɤޤΤʡ
317ڡ 8:38:21 51371
ֿء׾ι
a.each{|x|b.each{|y|c.each{|z|me(x).intersection(me(y))[4]==14&&me(y).intersection(me(z))[4]==15?(p x,y,z):0}}}

Ȥơ
28,420,10528,420,52528,2100,10528,2100,525ʡ
317ڡ 8:54:00 51372
ǯ
#51371ֿء׾ιԤ
Τˡȥθ155ܤȤ郎פʤ褦Ǥ͡
#51366ǤϤξϻȤäƤޤ
317ڡ 10:01:35 51373
ֿء׾ι
#51350
ʤۤɤǤ11ĤҤȤޤȤǸȤ褫äΤǤ͡(^-^)g""
317ڡ 10:36:47 51374
ֿء׾ι
#51350ȯۤ򤤤ޤ꤬Ȥޤ
p (1..11).to_a.combination(4).to_a.delete_if{|x|(0..2).map{|y|x[y+1]-x[y]}.include?(1)}.size
317ڡ 11:20:31 51375

#51372 ֿء׾ι
28420105ϺǾܿ420ʤΤdzʤȡ
餤ޤ
317ڡ 12:03:49 51376
٥륯åĥ
2100223557
22***7
22357
**357
ʴ¤٤ƤߤȤ狼䤹Ȼפޤ
2ĤΡΤʤȤˤ5ʤȤʤΤǡȤ߹碌3̤ꡣ
317ڡ 13:43:01 51377
٥륯åĥ
⤷Ǥʤñ55ȤäΤǤ礦
;פʽ񤭹ߤäΤޤ󡢼餷ޤ
317ڡ 20:40:44 51378
ֿء׾ι
#51376 Jޥޤ
äȤǤΤȤ˺Ƥޤ
Ŧ꤬Ȥޤ
318ʶ 3:13:34 51379
ֿء׾ι
̣ãͤ2100ˤʤ뤳Ȥơ
a.each{|x|b.each{|y|c.each{|z|me(x).intersection(me(y))[4]==14&&me(y).intersection(me(z))[4]==15&&x.lcm(y).lcm(z)==2100?(p x,y,z):0}}}

3̤꤬Ф褦ˤǤޤ
318ʶ 17:27:42 51380
ޤ륱
# Ruby PRIME 饤֥ȤäƤߤޤ
require 'prime'

# 饤ʡäݤؿʤäĹ
def d(n);n.prime_division.inject([1])do|ary,(p,e)|(0..e).map{|e1|p**e1}.product(ary).map{|a,b|a*b}end.sort;end

# 嵭ؿѤƤΥ饤ʡ
d(2100).map{|e|p e if d(e).index(14)==4}
320 9:55:39 MAIL:take4310@mobile.email.ne.jp 51381
ֿء׾ι
#51381εٶˤʤޤinject,productλȤ

Ȥϵˤʤޤ
㤨СᣵᣱΤȤ1,2,4,7,14,28145ܤǤ
⣱ܤξƤȤΤǡ
2100Ǥοξ5ܤ14פȤǤԽʬǤ̵ȡ
Ǥ˹θѤߤȤȤǤ餹ߤޤ
322ʲС 15:40:00 51382
ޤ륱
#51382
2100оݤʤΤǡ56Ͻ롢ʡ
322ʲС 20:35:55 MAIL:take4310@mobile.email.ne.jp 51383
ֿء׾ι
#51383 ߤޤ󡢥ΤޤǤ

84[1, 2, 3, 4, 6, 7, 12, 14, 21, 28, 42, 84]
140[1, 2, 4, 5, 7, 10, 14, 20, 28, 35, 70, 140]
ǡϡ1,2,4,7,14ǤΤǣ5ܤǤ

ȸä櫓Ǥףף
Τϡޤ륱󤵤ޤΥץȤ碌ƤƤޤա
324ڡ 15:42:52 51384
ޥ
ΤȤ٤ߤ¿ʤäƤƤߤޤ

äȻŻطܥץ饤١ȴطΩƹǤΤǤޤΤǡ轵פǤޤǤ
Tokyo 324ڡ 17:57:18 HomePage:51385
Ϥ
̩ꡡǵĢʸ롣βϤɤäƤߤʤʤäƤ
325ʶ 11:20:51 51386
ֿء׾ι
ޤʸޤǤå
325ʶ 13:19:01 51387
ޤ륱
#51384
θΤˤϾ郎ԴǤ
ȥȤθˤʤʥ1415ʪΤǡˤΤǡ
ŪOKʤǤ

ŦդǤ

Ķľˡʸ̤ξƤϤȡ

a = d(2100).delete_if{|e|!d(e).include?(14)}
i = d(2100).delete_if{|e|not d(e).include?(14) or not d(e).include?(15)}
u = d(2100).delete_if{|e|!d(e).include?(15)}

p a.product(i, u).delete_if{|a,i,u|d(a.gcd(i)).index(14)!=4 or d(i.gcd(u)).index(15)!=4 or a.lcm(i).lcm(u) != 2100}

⤦饤ʡɤʤǤ
326ڡ 9:49:13 MAIL:take4310@mobile.email.ne.jp 51388
ֿء׾ι
#51388 ʤ顦ؿǤ顢⤷ơ饤ʡ

require 'prime'
def d(n);n.prime_division.inject([1])do|ary,(p,e)|(0..e).map{|e1|p**e1}.product(ary).map{|a,b|a*b}end.sort;end

p d(2100).permutation(3).select{|x,y,z|d(x).intersection(d(y))[4]==14&&d(y).intersection(d(z))[4]==15&&x.lcm(y.lcm(z))==2100}

̤
[[28, 420, 525], [28, 2100, 105], [28, 2100, 525]]
328ʷ 6:52:19 51389
ֿء׾ι
ңǡ륹ȥ졼Ȥʴؿ׻˻֤ȤϻפΤǤ
def m(i)
1.upto(i).select{|x|i%x==0}
end

330ʿ 7:17:23 51390
ֿء׾ι
Ƥꡡ2100Τˤ֤paiza.ioǼ¹ԤӤȡ

δؿ
0.000225618

Фơޤ륱󤵤Υץ
7.4818e-05

ǡδؿλʬΰλ֤ǺѤߤޤǤ
330ʿ 7:30:23 51391
ޤ륱
prime饤֥ΰϡǤ͡
äƤselect Ȥ intersection ȤäٶͤС
330ʿ 22:51:35 MAIL:take4310@mobile.email.ne.jp 51392
٤ߤǤ礦
٤ߤǤ礦
331ڡ 0:03:11 51393
鯤ο
#51393

ޤ2Ϣ³ǵ٤ߤˤʤäϤʤΤǡ⤦ԤǤ
331ڡ 0:06:05 51394

˻ΤǤ礦͡
ͤǤ

19Ⱦ˽ë첣Υ졼˾äƤϤä㤤ޤ
ϥ졼򲼤äƤΤǤäִ֤˾2Ȥ礭ǡֻ줬͡ġפȤäƤΤʹơ֤פȿ֤äΤǤɤʤʤΤ狼ޤǤ
Ϥ25ǯʲä򤷤Ƥͤ򸫤ȤʤΤǡФäƤޤޤ

331ڡ 0:12:14 51395
sodo
ëˤϤޤǤ
ܼ߲᤮ޤǥǵäƤΤǤʤǤ
331ڡ 0:21:00 MAIL:sodo@ab.auone-net.jp 51396
#51385
Ķ¿˻³桪ȻפäƤޤʡOˡ
331ڡ 3:27:53 51397
ޥ
ޤäĤ꤬ե륢åץɤΥߥ򤷤Ƥ褦Ǥ...orz

Ȥꤢա롼ޤʽ̤ϤĤΤߤˤޤ⡢ۤɶŤäΤǤϤʤΤ...
Tokyo 331ڡ 13:53:21 HomePage:51398