Ȥ
basic

LET s=0
for a=1 to 9
for b=0 to 9
for c=0 to 9
for d=0 to 9
for e=1 to 9
IF 10000*a+1000*b+100*c+10*d+e-(10000*e+1000*d+100*c+10*b+a)=9999 THEN LET s=s+1
next e
next d
next c
next b
next a
PRINT s
END

f9800()
˭ԡ 322ڡ 0:07:33 MAIL:fttnm528@ybb.ne.jp 39133
ݤ󤭤
9999ܥ990ݥ990ݥ99999999

ȥƱ10̤겿ǤOK
10̤겿ǤOK
ȥȤ߹碌ϡ2,1)(3,2)(4,3)(5,4)(6,5)(7,6)(8,7)(9,8)8̤ꡣ
81010800̤
322ڡ 0:08:39 39134
fumio
Фϡפ֤ΥꥢǤ
ǤϤޤ͡
322ڡ 0:10:00 39135

οξΰ̤ˣ¡áġŤȤդ
9999A+990B-990D-9999E=9999
101A+10B-10D-101E=101
101(A-E)+10(B-D)=101
10110ϸߤǤʤΤǡB-D=0 äơA-E=1
(B,D)Ȥ߹碌10̤ꡢE0ꡢ(A,E)Ȥ߹碌ϣ̤
äϲǤ⤤Τǡߣߣ᣸̤
ɤˤⵡŪ˲򤤤ƤޤޤŪˡʬޤ
ǽä롼ƣäƤޤޤorz
裲롼ס 322ڡ 0:13:45 HomePage:39136
ͣ.ǥ
ϴñʡγˤϡĤޤ̥ߥΤ٤ʤޤ
ˡϡݤ󤭤#39135ƱǤ
322ڡ 10:30:07 39137
xxx
㤦(㡡Ȥ)ߡʥݣˤˤˤʤʺξȣˤ
㤦ȣߡʥݣˤˤʤ
㤦Ѥʤˤʤ
㤦ȡݣߡʥݣˤˤʤ
㤦ȡݣߡʥݣˤˤʤ뤫
ȥΥڥϣ̤ͤ
ȥϣ̤ꡢϤʤǤ⤤飱̤ꡢ
ߣߣǣˤʤޤ
ǽְ㤨ƣää㤤ޤ
322ڡ 0:30:50 39138
ߤ
ΰ̤Ƚΰ̤Ʊᣱ̤ꡢɴΰ̤ϲǤ褤ᣱ̤
ΰ̤Ȱΰ̤ϡʣˡʣˤΤ褦ˡֺפġְΰ̤Τۤ
ˤʤΤ̤ꡣ

ʾ塢ߣߣ᣸̤ꡣ
322ڡ 0:44:43 39139
hide
ʲǾ̤ܤƥᥪܣ
ܤƥܣᥨ
ܣᥪ饤ᥨ
ϲǤ⤤
äƣߣߣ᣸
˻
ꥢϥ󡡡 322ڡ 0:49:40 39140
ϥ饮㡼ƥ
Ϥ褦ޤץǤʤڤ˷׻ǤϰϤǤ
̶彣 322ڡ 6:04:40 HomePage:湩ؤ˥39142
ͼ
׻

ᥪܣᥨ
Ȥ狼Τ
ߣߣ᣸

ơŻŻä
322ڡ 8:35:36 39143
abcba@baLLjugglermoka
0ˤʤʤȤΤŪǤΥݥȤ˰äꤽˤʤޤ
322ڡ 8:39:42 39144

#39136ΣͤƱǤ
ȥϣϣΣǡΣǤʤΤǡϣΣǡ
322ڡ 9:50:03 39145
uchinyan
Ϥˤϡơϡ
ࡤդޤʵ⤷ޤޤʴǡ

㥢ϣʤΤǡ 1 9 0 9 ˤʤޤ
ޤ㥪ñʤΤǡʲβǽ⤢褦ʵޤޤ˴Ǥ
ʸβλˤС ǰϤޤ줿ΤϣȤɤΤǡ¿ʬ̣ʤΤǤ礦
βǤϡ 1 9 0 9 ˤʤޤ
ʲǤϤפäƲ򤭤ޤ

㥢 - 㥪 = 9999ʤΤǡ
塤Ĥޤꡤܤ顤 - = 9 (10 + ) - = 9 Ǥ 0 ˤʤʤΤ - = 9 Ϥ
(10 + ) - = 9 = + 1Ǥ
ܤ顤( - 1) - = 9 (10 + - 1) - = 9 Ǥ( - 1) - = 9 ϥμͤ餢
(10 + - 1) - = 9 = Ǥ
ܤ顤( - 1) - = 9 (10 + - 1) - = 9 Ǥ( - 1) - = 9 餫ˤ
(10 + - 1) - = 9 = 0 9 ΤɤǤ褤Ǥ
ܤ顤( - 1) - = 9 (10 + - 1) - = 9 Ǥ( - 1) - = 9 ϥμͤ餢
(10 + - 1) - = 9 = Ǥϣܤη̤Ȱפޤ
Ǿ̷塤Ĥޤꡤܤ顤( - 1) - = 0 ǡ = + 1Ǥϲη̤Ȱפޤ
ɡ
= + 1 = 0 9 ΤɤǤ褤
ˤʤޤ
ǡǽդμϰϤθȡ
ϥˤäưĤ˷ޤ롤ϥˤäưĤ˷ޤ롤 0 9 10 ̤ꡤ 0 9 10 ̤ꡤ 1 8 8 ̤
Ȥʤꡤ 10 * 10 * 8 = 800 ̤ꡤˤʤޤ

⤦ŪˤäƤ褱С
㥢 - 㥪
= (10000 * + 1000 * + 100 * + 10 * + ) - (10000 * + 1000 * + 100 * + 10 * + )
= 9999 * ( - ) + 990 * ( - )
= 9999
9999 * ( - - 1) = 990 * ( - )
101 * ( - - 1) = 10 * ( - )
ǡ 101 10 ϸߤǤʤΤǡ - - 1 10 ܿ - 101 ܿˤʤޤ
μͤ
- - 1 = 0 - = 0
ˤʤ뤷ޤ󡣤ޤ餫ˡ 0 9 ΤɤǤ褤Ǥ
ƱǤ

ʤ 0 Ȥ 900 ̤Ǥ͡
ͥνȡ 322ڡ 11:23:50 MAIL:uchi@sco.bekkoame.ne.jp 39146
uchinyan
ǼĤɤߤޤ
󡤥 0 ȤʤǽͤΤϴְ㤤ȤǤǤϤΤʤΤʡ
ʤˡϡۤ褯ʬʤΤ¿ޤʬषƤʤʡȤǡάޤ
§ץȡ#39146θȾ¿ǡĤ¿ʬȾΤ褦Ǥ
ͥνȡ 322ڡ 11:44:59 39147
̵
㥢䡼㥪᣹
㥢㥪ܣݣ
ϣʾʤΤǡᥪܣ

򥪤֤
ʥܣ˥㥪ʥܣˡܣݣ
㣱㥨ܣݣ
㥤㥨
㥤㥨
줬ΩĤξϡᥨ

ȥȤ߹碌(2,1)(9,8)8̤
ȥȤ߹碌10̤
ϲǤ⤤Τ10̤

ä81010800̤
322ڡ 12:23:36 39148
deu
#39147
Ϻǽ饪 0 Ȥʤޤ 900 Ȥޤ
Ūˤϥ 0 ǤʤȲ᤹Τʤȹͤľ 800 ľޤ
ɤˤǤȻפΤǡ褤ȴޤ
322ڡ 12:56:25 39149
ޤ
Τˡ1ΰ̤05ˤϤʤ󤬡
322ڡ 14:47:40 39150
???
Υޥ
Option Explicit
Sub Macro1()
Cells(1, 1).Value = 0
Dim n1 As Long
Dim n2 As Long
For n1 = 10000 To 99999
n2 = n1 Mod 10
n2 = n2 * 10 + ((n1 \ 10) Mod 10)
n2 = n2 * 10 + ((n1 \ 100) Mod 10)
n2 = n2 * 10 + ((n1 \ 1000) Mod 10)
n2 = n2 * 10 + (n1 \ 10000)
If n2 >= 10000 And n1 - n2 = 9999 Then
Cells(1, 1).Value = Cells(1, 1).Value + 1
Cells(Cells(1, 1).Value, 2).Value = n1
Cells(Cells(1, 1).Value, 3).Value = n2
Range("B" & Cells(1, 1).Value).Select
End If
Next n1
Range("A1").Select
End Sub
㥪ϣǤʤƤ⤤褦ʵޤ
322ڡ 15:24:24 39151

㥢ݡ㥪᣹ξդˣ­̤ꡢ㥪ܣʥܣ˥㥢䡣äƥᥪܣᥨǤաߣߣ᣸Ȥʤޤߤʤ񤫤Ƥ褦˥ᣰ죹̤ȤƤϤ졢տơͤ˥ߥϤʤᣰƤäޤ
322ڡ 16:33:46 39152
ս¤٤ƤǤ
ȤʤäƤơ褷
ս¤٤ƤǤ룵
ȤϤʤäƤʤΤϡĤޤ֥Ǥ褤פȤ̣
ꤲʤ̯ʤҤäǤäơǣϻǤ⤢ꤨʤ

οƤޤ
322ڡ 17:28:35 39153
Ȼ
⥪ 0 βǽͤޤ褤Ȼפޤ
322ڡ 19:47:05 39154

Ǥʥܣ˥㥢ʥܣˡǤ
322ڡ 21:27:56 39155
⡼ޥ
ʤΤ...^^;
0㤤ʤʤϪȤפʤäΤ...
900ʤޤޥե꡼Ƥޤ...Orz...
322ڡ 23:18:46 39156

ؤäݤȤǤ
5ο
10000a+1000b+100c+10d+e
ؤ¿ΰ̤񤯤
a+10b+100c+1000d+10000e
Ȥʤꡢդ
(10000a+1000b+100c+10d+e)-(a+10b+100c+1000d+10000e)
׻
9999a+990b-990d-9999e=9999ĭ
99ꡢ
101a+10b-10d-101e=101
줬Ω뤿ˤ
c0910̤ꡢ
b=dȤʤ뤿ᡢ
bdȤ߹碌10̤ꡢ
ǺǸ塢
a,eȤ߹碌9̤ǼԤơ
8̤äȤ˵Ť
10108=800

轵ĥޤǤޤǤľο϶Ȥۤۡ
򤱤ɤäǤ
323ʶ 4:07:48 HomePage:39157
mukku
323ʶ 18:01:15 39158
ޥ
ߥޥ󡢺ϸȾޤšīմֽޤơб٤ʤޤᣰξη˸Ƥбޤޤm(__)m
Mac mini 323ʶ 18:31:30 HomePage:Men@Work39159
ޥ
Ƥޤʸ򤽤ΤޤޤȤ館ȡ900ȤΤбǤȽǤޤm(__)mɽϡ줫齤ޤ

ηǤ¿ˤǤ򤪤ޤѿޤǤ
iMac 324ڡ 1:11:23 MAIL:masaru-y@sansu.org HomePage:֥39160
???
֥ᣰξޤפȤ⡢֡㥪ϣȤϸ¤ʤפȤ褦ˤ褤ΤǤϤʤǤ礦
10000-00001=9999ξ⤢ΤǤ顣
äȤǽ餫㥪򣵷ȤƤФ褫äΤ⤷ޤʸϡ㥢򣵷Ƚ񤤤Ƥޤ㥪Ȥ񤤤ƤʤäΤǡ
324ڡ 8:24:34 39161
ߡBMơۡ
900ǻߤޤäƤͤǤ(;)
324ڡ 16:26:03 39162
ޤT
˥󥸡ˤƤϴñǡȴ㤤ޤߤƱˡǤȤƤޤ
324ڡ 19:03:21 39163
ܣʸ
ǡǡĶñǤʤ
324ڡ 20:33:08 39165
쳤Τ
ߤʤ󤬤Ǥܣܣ
ܥ飱ܣܣܣܥҤ
ܣݣݣ
飹(ܣݣݣ)ᣱ
ǣǤϣϤĤʤ饤ᥨ
ϥ꣱¿
饢ϣ̤ꥤϣ̤ꥦϣ̤
ǣǤ
ǽ饦ƨƤޤ
325 9:05:18 39166