٥륯åĥ
1­ƹפ17ñ̤ѲΤϲ2夬99ɴΰ̤9Ǥʤ硣
äƺ9799
κݡƤϥߥäƤޤޤ
421ڡ 0:06:39 44375

٤Ǥ
ޤˣäˤĤƤ⡢ư̤οϣܿǤ

ޤˣäˤĤƤ⡢ư̤ο¤ϣܿǤ

Ǥ(;
421ڡ 0:11:31 44376
ߤ
Ȥꤢ礭ʤꤽʤΤϳư̤¤ʤΤǡ
ʣˣ
ʣˣ
Ȥ߹碌åΰ̤ʳȣ­ˣܿˤʤʤΤǡ
ʣˤǤϣ
ʣˤǤϣ
ǧФ褤ξʸοˣ­Ƥư̤ο¤ܿˤ˹礦Τ
ʣˤǤΣȡʣˤǤΣΤߡ

ʾΣοdzư̤¤ˤʤΤϣΤߤǤꡢ
ξʸοˣ­Ƥư̤ο¤ܿˤ˹פʤΤǡ
οˤʤ롣
421ڡ 0:15:56 44377
Mr.ǥ
1­Ȥˤäơ巫夬ȳư̤ο¤
9*2117Τ
Ȥοϡ99(9ʳˤηο
+16ǤФ褤
ο֣ס.....Ȥޤ
421ڡ 0:15:29 44378
ǯ
åȿ᤮ơ褯ɤߤ⤻äȤܿʤƷ׻Ƥܣʣˤ⤦㤯㡣
ɤľơƱˡǡ
夬̵꤬С¤κϣ巫夬¤κϣǤ϶ˣܿˤϤǤʤ
巫夬¤κϣǡܢܣܣܿʡܢܿˤȤƵ᤿

421ڡ 1:09:06 44379
ޤ
1­17ܿˤʤפȥߥ꡼ɡ^^;

ߤ ƱˡǤޤ
ɤä餳ΤȻפʤ顢ⵤ褯򤫤Ƥޤ
421ڡ 0:31:06 44380

Ф
ɤ߰㤨9332Ƥޤ(^^;
Ȥäˡʤ1ΰ̤9Ȥƽõޤ

422ʶ 13:41:07 44381
ˤ⡼
9ѷĴɤǸޤ̵ǤƥۥäȤޤ
­Ƥư̤¤ƱˤʤȤϹͤŤ餤Τǡ
¤¤ѲΤ˹ʤäƤߤޤ
Ȥϳ#44377ƱˡǤ

421ڡ 0:39:02 44382
Ȥ
Basic

for a=1000 to 9999
if mod(ip(a/10^3)+ip((a-10^3*ip(a/10^3))/10^2)+ip((a-10^2*ip(a/10^2))/10)+10*fp(a/10),17)<>0 then goto 10
if mod(ip((a+1)/10^3)+ip((a+1-10^3*ip((a+1)/10^3))/10^2)+ip((a+1-10^2*ip((a+1)/10^2))/10)+10*fp((a+1)/10),17)<>0 then goto 10
print a;
10 next a
END

f9
8899 9799()
˭ԡ 421ڡ 1:11:11 44383
̴
ογư̤¤Ǻϣ˶ᤤΤͤäƤ
ܿǤ뤫顢ϣʤȤϡ夬
Ǥ롣äƺǽΣκϣȤʤ롣
ٻΤ桡 421ڡ 6:21:59 44384
ϥ饮㡼ƥ
Ϥ褦ޤ

OctaveǥץǤץǤ礦ɤ
٥Ǥ
421ڡ 6:47:45 HomePage:湩ؤ˥44385
ˤ
1­17ǡ
ܢᣱ礭Τ97
ä9799
Ͽ̤ǿɤǤ
ļˡ 421ڡ 7:20:37 MAIL:nikotan@fat.coara.or.jp 44386
weapon
Ǥߤʤ󡢻إȤʤɤ򸫤Ƥޤ
ͤϡȡϲδۡߤäαȡ˻ԥԥ餤Ǥ
ɤ򤽤ʥȤСƤ
421ڡ 9:32:10 44387
???
vbscript
deta=0:n1=9
while deta=0 and n1>=1
n2=9
while deta=0 and n2>=0
n3=9
while deta=0 and n3>=0
n4=(17*2-n1-n2-n3) mod 17
if n4<=9 then
m=(n1*1000+n2*100+n3*10+n4)+1
m0=m\10000
m1=(m\1000) mod 10
m2=(m\100) mod 10
m3=(m\10) mod 10
m4=m mod 10
if (m0+m1+m2+m3+m4) mod 17=0 then
deta=1:kotae=m-1
end if
end if
n3=n3-1
wend
n2=n2-1
wend
n1=n1-1
wend
msgbox kotae
421ڡ 10:42:34 44388
uchinyan
Ϥˤϡơϡ
ñǤ͡ȤƤפǤ礦̤ξˤ褤꤫ʡ
ʴǡ

ο 1 ­Ȥ˰ΰ̤Ƿ꤬ʤȡ
Ʒο­ 1 ʤΤǡ1 ­ȸξ 17 ܿϤޤ
ǡΰ̤ 9 ȷޤޤ
ο 1 ­Ȥ˽ΰ̤Ƿ꤬ʤȡ
Ʒο­ϡΰ̤ 9 꽽ΰ̤ 1 ΤȤ 8 ʤΤǡ
1 ­ȸξ 17 ܿϤޤ
ǡΰ̤ 9 ȷޤޤ
ο 1 ­Ȥɴΰ̤Ƿ꤬ʤȡ
Ʒο­ϡΰ̤Ƚΰ̤ 9 ĸɴΰ̤ 1 ΤȤ 17 Τǡ
οκ 9999 dzƷο­κ礬 36 θȡ
1 ­ογƷο­ 34 Ǹ夬 17 ʤСξȤ 17 ܿǤ
ǡɴΰ̤Ƿ꤬ȡΰ̤Ƿ꤬ʤ 9 * 3 - 1 = 26 ꡤ 9 * 4 - 1 = 35 ꡤ
ɤ 1 ­ȸξ 17 ܿϤޤ
ǡդϡ
ΰ̤ 9ΰ̤ 9ɴΰ̤ 9 ʳ1 ­ογƷο­ 34夬 17Ǥ
줬ǽʤΤϡ9799 8899 Ǥ
ǤϡΤǡ9799ˤʤޤ
421ڡ 12:19:24 44389
ϺĹ
ȯʤΤǽ񤭹ߡ
Τ˾פǤ1ܤȷޤȡȤϴñ˷ޤޤ5ܤ礭ȡɤ뤫ʡʤƹͤʤ򤭤ޤ줯餤񤷤ˤϤ礦ɤǤ
421ڡ 12:35:43 44390
uchinyan
ǼĤɤߤޤ


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

ϡȤ⳵ͤ͡ơ
ΰ̤ 9ΰ̤ 9ɴΰ̤ 9 ʳ1 ­ογƷο­ 34夬 17Ǥ
˹ʤࡤȤˡΤ褦Ǥ
ͤ˼㴳ΥХꥨ󤬤äơ
夬 99ԤƷο¤ 34 -> 17Ԥ
ΰ㤤Ϥޤ͡
421ڡ 12:43:50 44391
Mr.ǥ
#44387 weapon
˿ͤ椨ĤΤ褦ʤȤ⸫Ƥޤ
ֿػ˥󥸡....䤵ǡȶˤ褦ʤȤˤΤ¿Ǥ͡ʷ
иߡؤ˥󥸡...٤ޤǤ꤬¿ʡʷ
֥ɥεޤޤʿء....ˤʤ٤ǽꤵƤޤʵޤޤȤޤ
421ڡ 15:52:57 44392

ִַݤǣ
θɤƤ⣸ˤʤޤǤ
ɤƤǤ礦
weaponMr.ǥ󡢡¾ΤߤʤƱ򸫤Ƥޤ
ԥԥθ³ԡɥεޤޤʿؤϤۤȤɲ򤱤Ȥʤμ꽬򤱤褦ˤʤ뤫ʤįƤޤ

421ڡ 16:28:47 44393
Ȥ
#44390

>5ܤ礭ȡɤ뤫ʡʤƹͤʤ򤭤ޤ

ץʸη򤢤ƹͤƤޤ
1ʬǤ6ޤǤǤBasic ǡʲ
s=546-(n-1)n()Ȥ礭1ܤ546ܤޤǤǤޤ

PRINT TIME$
FOR a=100000 TO 999999
IF MOD(IP(a/10^5)+IP((a-10^5*IP(a/10^5))/10^4)+IP((a-10^4*IP(a/10^4))/10^3)+IP((a-10^3*IP(a/10^3))/10^2)+IP((a-10^2*IP(a/10^2))/10)+10*FP(a/10),17)<>0 THEN GOTO 10
IF MOD(IP((a+1)/10^5)+IP((a+1-10^5*IP((a+1)/10^5))/10^4)+IP((a+1-10^4*IP((a+1)/10^4))/10^3)+IP((a+1-10^3*IP((a+1)/10^3))/10^2)+IP((a+1-10^2*IP((a+1)/10^2))/10)+10*FP((a+1)/10),17)<>0 THEN GOTO 10
LET s=s+1
IF s=546-(5-1) THEN PRINT "5";a
10 next a
PRINT s;""
PRINT TIME$
END

f9

19:44:19
5 988899
546
19:44:27
˭ԡ 421ڡ 20:22:22 44394
⡼ޥ
#44378 Mr.ǥƱǤ ^^
ϤʤΤȻפǤޤOrz
¨ ^^;v 421ڡ 22:00:00 44395
Recall
ʰ̤¤ϡ󤯤夬9äƤ⤦󤯤夬8櫓Ǥ顢礦ɹ碌17äƤʤǤ͡
Ȥϲ2夬99dzƷιפ17ܿˤʤοͤСäƤ1,2ʬ餤Dz򤱤Ȼפޤ͡
421ڡ 22:05:20 44396
weapon
#44392
#44393
쥹꤬Ȥޤ
ޤΤʤäȤȤΤϡʤʤʤΤǤ͡
421ڡ 22:39:44 44397
Goosehouse
פ֤ƬDz򤱤ޤ
1­17뤫17뤫ʤȤʤΤǡ99Ƿޤޤ99181001ǡ17
ȡ夬18ʤΤǡ17ܿˤˤϡ¤16ˤʤȤ߹碌ͤˡ礭Τǡΰ̤ϼưŪ9ǡĤäɴΰ̤ˤʤꡢ7ˤʤޤäơ9799ȡ
422ʶ 1:07:35 44398

̾夬ͤȤäꤷޤ
ǽ17ܿǺǤޤ
422ʶ 2:07:48 HomePage:44399
fumio
Фϡ奪ե߳ڤߤˤƤޤ
ǤϤǤϡ
424 18:26:31 44400