Ｍ

ん？ 前のパスで入れるようです。　　よってしばらく自粛。

6月13日（木） 0:07:16　　 　　40625

ようせん

バグが直ったみたいなので書きますね。 道は全て結んだ場合より２本欠けています。全て結んであれば5!=120通りです。DEorEDのルートは4!2!=48通り、FAorAFのルートは4!*2=48通り、両方の場合が2*3!2!=24通りなので、120-48-48+24=48通り。 結構オーソドックスな解き方だと思っています。

6月13日（木） 0:23:17　　 　　40626

みかん

ＡとＦ、ＤとＥの相互移動ができないが、他の２点の組み合わせはすべて可能。 したがって、制約のない場合の５！＝１２０通りからＡＦ・ＤＥの相互移動を しているものを除外する。 （い）ＡＦとＤＥの両方を含むもの　２４通り （ろ）ＡＦのみを含むもの　２４通り （は）ＤＥのみを含むもの　２４通り 詳しくは略しますが、算数の発想で足りる範囲だと思います。 以上より１２０−（い）−（ろ）−（は）＝４８通り。

6月13日（木） 0:28:50　　 　　40627

abcba@baLLjugglermoka

A,1,2,3,4,5,AでFは2〜4のいずれかに入る。そして、DEは隣り合わない。ここから、(4!-2×2×2)×3=48通り。 この手の問題は、場合分けを面倒くさがらずに計算すればあっという間なのに、エレガントな方法を追い求め過ぎて無駄にタイムロス事が多いですね。

6月13日（木） 0:41:07　　 　　40628

Mr.ダンディ

AF、EDともに通れるようにすると、すべての行き方は　5！＝120通り そのうち （１）AFを通るもの　24*2＝48　（通り） （２）DEを通るもの　24*2＝48　（通り） （３）AFもDEも通るもの　2*12＝24　（通り） AFもDEも通らないもの・・・・120−48−48＋24＝48　（通り） としました。

6月13日（木） 0:46:39　　 　　40629

スモークマン

やっとこさぁ...で...みなさんと同じでした...^^; AF,FAがないので...2*4! DE,EDがないので...4!*2 両方のとき...2*2*3! 5!-2*4!-2*4!+2*2*3!=4!+4!=48 になるのか...?

6月13日（木） 0:51:21　　 　　40630

みかん

「Ａを出発して飛行機で５都市を回ってＡに戻る」という問題文のほうが 良かったかな？

6月13日（木） 0:54:25　　 　　40631

数樂

#40629 と同じです。

6月13日（木） 1:27:31　　 HomePage:数樂　　40632

ハラギャーテイ

場合分けや地道に考えることは苦手でした。あってずっぽうです。

山口　　 6月13日（木） 6:30:33　　 HomePage:制御工学にチャレンジ　　40633

ゴンとも

A,B,C,D,E,Fにそれぞれ1,2,3,4,5,6と番号を振り 十進basicで問題文の通り数は・・・ let s=0 for a=1 to 1 for b=2 to 5 for c=2 to 6 if c=b then goto 50 if b=2 and (c<>3 and c<>4 and c<>5 and c<>6) then goto 50 if b=3 and (c<>2 and c<>4 and c<>5 and c<>6) then goto 50 if b=4 and (c<>2 and c<>3 and c<>6) then goto 50 if b=5 and (c<>2 and c<>3 and c<>6) then goto 50 if b=6 and (c<>2 and c<>3 and c<>4 and c<>5) then goto 50 for d=2 to 6 if d=b or d=c then goto 40 if c=2 and (d<>3 and d<>4 and d<>5 and d<>6) then goto 40 if c=3 and (d<>2 and d<>4 and d<>5 and d<>6) then goto 40 if c=4 and (d<>2 and d<>3 and d<>6) then goto 40 if c=5 and (d<>2 and d<>3 and d<>6) then goto 40 if c=6 and (d<>2 and d<>3 and d<>4 and d<>5) then goto 40 for e=2 to 6 if e=b or e=c or e=d then goto 30 if d=2 and (e<>3 and e<>4 and e<>5 and e<>6) then goto 30 if d=3 and (e<>2 and e<>4 and e<>5 and e<>6) then goto 30 if d=4 and (e<>2 and e<>3 and e<>6) then goto 30 if d=5 and (e<>2 and e<>3 and e<>6) then goto 30 if d=6 and (e<>2 and e<>3 and e<>4 and e<>5) then goto 30 for f=2 to 5 if f=b or f=c or f=d or f=e then goto 20 if e=2 and (f<>3 and f<>4 and f<>5) then goto 20 if e=3 and (f<>2 and f<>4 and f<>5) then goto 20 if e=4 and (f<>2 and f<>3) then goto 20 if e=5 and (f<>2 and f<>3) then goto 20 if e=6 and (f<>2 and f<>3 and f<>4 and f<>5) then goto 20 for g=1 to 1 let s=s+1 10 next g 20 next f 30 next e 40 next d 50 next c 60 next b 70 next a print s end f9押して　48・・・・・・(答え)

豊川市　　 6月13日（木） 8:11:07　　 MAIL:fttnm528@ybb.ne.jp 　　40634

通りすがり

B⇒C(またはC⇒B)のオイラーパスなら8336通りかなぁ？

6月13日（木） 11:02:00　　 　　40635

uchinyan

はい，こんにちは。さて，今回の問題は．．． これは，一見難しそうに見えたのですが，思ったよりは簡単でした。こんな感じ。 図を見ると，6 個の地点のうちつながっていないのは A と F，D と E だけで，それら以外はすべてつながっています。 そこで，まずはすべてつながっていいるとして，それから，実際にはつながっていないものを除く，と考えます。 A から出発してして A に戻ってくるので．．．． すべてつながっていれば，途中は B 〜 F の 5 個の地点の順列で，5! = 120 通り。 この B 〜 F の順列のうち，特に， A と F がつながっている場合は，F が B 〜 F の最初か最後のときなので，4! * 2 = 48 通り， D と E がつながっている場合は，D と E が B 〜 F の中で隣り合うときなので，4! * 2 = 48 通り， となり，これらを引きます。しかしこれだと， A と F 及び D と E の両方がつながっている場合，F が B 〜 F の最初か最後で D と E が B 〜 F の中で隣り合うとき，3! * 2 * 2 = 24 通り， を引き過ぎているので加えます。 そこで，結局， 求める場合の数 = 120 - 48 - 48 + 24 = 48 通り になります。

ネコの住む家　　 6月13日（木） 17:41:18　　 　　40636

uchinyan

掲示板を読みました。 今回は，若干計算の仕方が違う方もいらっしゃるようですが，皆さん同じ考え方のようです。

ネコの住む家　　 6月13日（木） 12:44:30　　 MAIL:uchi@sco.bekkoame.ne.jp 　　40637

???

エクセルのマクロ Option Explicit Dim a(6) As Integer Sub Macro1() Cells(1, 1).Value = 0 a(0) = 1 Call saiki(1) End Sub Sub saiki(ByVal n As Integer) Dim max As Integer Dim j As Integer If n < 6 Then a(n) = 2 max = 6 Else a(6) = 1 max = 1 End If While a(n) <= max If QX(n) Then If n < 6 Then Call saiki(n + 1) Else Cells(1, 1).Value = Cells(1, 1).Value + 1 For j = 0 To 6 Cells(Cells(1, 1).Value, j + 2).Value = chiten(a(j)) Next j End If End If a(n) = a(n) + 1 Wend End Sub Private Function QX(ByVal n As Integer) As Integer Dim j As Integer QX = 1 j = 1 While QX And j < n If a(j) = a(n) Then QX = 0 Else j = j + 1 End If Wend If QX Then '.ABCDEF 'A011110 'B101111 'C110111 'D111001 'E111001 'F011110 Select Case a(n - 1) Case 1 QX = Val(Mid("011110", a(n), 1)) Case 2 QX = Val(Mid("101111", a(n), 1)) Case 3 QX = Val(Mid("110111", a(n), 1)) Case 4 QX = Val(Mid("111001", a(n), 1)) Case 5 QX = Val(Mid("111001", a(n), 1)) Case Else QX = Val(Mid("011110", a(n), 1)) End Select End If End Function Private Function chiten(ByVal n As Integer) As String Select Case n Case 1 chiten = "A" Case 2 chiten = "B" Case 3 chiten = "C" Case 4 chiten = "D" Case 5 chiten = "E" Case Else chiten = "F" End Select End Function

6月13日（木） 16:37:31　　 　　40638

さんすうたん

最初樹形図を書こうかなと思ったのですが、めんどくさくなってやめました(笑) 他の方も書かれていますが、B,C,D,E,Fを並べ替える順列問題として解きました。 はじめまたは終わりにFが来ない並べ方：72通り 上記かつ、DEが隣り合う並べ方：12×2通り ゆえに、72-24=48　(Ans.) はじめ問題文読み違えて"全ての地点"ではなく"全ての経路"かと一瞬思った… それはそれで、また面白い問題になりそうですね。

6月13日（木） 17:20:48　　 　　40639

工事中

DE間の通路があるものとして。4×4×3×2＝96通り D→EまたはE→Dの経路があるものが、B,C,(D,E),Fの 並べ替え・・・4!×2!＝48通り 96−48＝48通り、と計算しました。

6月14日（金） 0:21:27　　 　　40640

かっちゃん

P(A)∪P(B) = P(A) + P(B) - P(A)∩P(B) というのは、小学生の考えに及ばないような気が・・・

6月14日（金） 6:52:02　　 　　40641

かっちゃん

P(A)∪P(B) = P(A) + P(B) - P(A)∩P(B) というのは、小学生の考えに及ばないような気が・・・

6月14日（金） 6:56:24　　 　　40642

次郎長

出張でした。少なくとも９６通り以下、あとはフィーリングでまぁ半分。 なら書き出してみようと、伊丹で搭乗までの間に書き出したら、意外と早く出来ましたが、どうも消化不良。皆さんのを読んで勉強します。東京は雨、寒かった。戻ってきたら伊丹は蒸せる暑さ。この違い！

6月14日（金） 21:51:30　　 　　40643

マサル

今週の問題ですが、ちょっと（仕事がらみで）出かけなくてはならなくなり、急きょ急いで問題を作ってしまいました。ミスの有無等のチェックも短時間なので心配ですが、何かありましても、すぐには対応できない可能性がありますことを、予めご了承いただければ幸いです。m(__)m

会社　　 6月19日（水） 22:34:15　　 HomePage:算チャレ　　40644