river_history
規則性を見つけることなく、数え上げたので、これから法則を見つけてみます。
　　 11月14日（木） 0:06:56　　 　　41098
長野　美光
（図１、図２参照）は。（図２、図３参照）ですね。

はままつ　　 11月14日（木） 0:07:12　　 HomePage:ヨッシーの算数・数学の部屋　　41099
abcba@baLLjugglermoka
角は14×4、中心は11×4。合計は100。
　　 11月14日（木） 0:09:03　　 　　41100
いちごみるく
初めと終わり決めて四パターンに場合わけ
　　 11月14日（木） 0:09:32　　 　　41101
ようせん
場合分けしながら解きました。対称性が使えますね。
マの選び方→サの選び方→ルの選び方→サの選び方、まで考えればOK
ざっくり書くと、四隅スタートで56通り、真ん中スタートで44通り
足して100通りです。
　　 11月14日（木） 0:11:04　　 　　41102
みかん
（イ：角のマをスタートとするパターン）
角のマ→別の角のマ　２通り
角のマ→中央のマ　６通り
角のマ→出発点と同じ角のマ　６通り
　以上において出発点の角のマは４か所あるので、（２＋６＋６）×４＝５６通り
（ロ：中央のマをスタートとするパターン）
中央のマ→角のマ（４か所ある）　６×４＝２４通り
中央のマ→中央のマ（１手目の方向が４方向ある）　５×４＝２０通り

これらより、５６＋２４＋２０＝１００通り。
　　 11月14日（木） 0:18:36　　 　　41103
タロタロ
ルを始点にしてサマと繋げるように考えると、3通りあるルが4つ、4通りあるルが4つ。よって、4x(3^2+4^2)=100、と考えました。
　　 11月14日（木） 0:22:21　　 　　41104
Mr.ダンディ
�　奮僂離泛�角のマ）のルート....4*2*4＝32　（通り）
�◆奮僂離泛�中央のマ）のルート....4*2*3＝24　（通り）
��（中央のマ→角のマ）のルート....�△汎韻犬�　24（通り）
�ぁ蔽羆�のマ→中央のマ）のルート....1*4*（1+4）＝20　（通り）
よって
32＋24*2＋20＝100　（通り）　としました。
　　 11月14日（木） 0:36:58　　 　　41105
あめい
角と真ん中に場合分けし、数えました。
角のマ（４通り）→サ（２通り）→外のル（１通り）→サ（３通り）→マ（１通り）
　　　　　　　　　　　　　　　→中のル（１通り）→サ（４通り）→マ（１通り）
で、４×２×（３＋４）＝５６通り
中のマ（１通り）→サ（４通り）→外のル（１通り）→サ（３通り）→マ（１通り）
　　　　　　　　　　　　　　　→中のル（２通り）→サ（４通り）→マ（１通り）
で、４×（３＋２×４）＝４４通り
合計５６＋４４＝１００通りになりました。
　　 11月14日（木） 1:12:38　　 　　41106
fumio
おはようございます。
ではではまたね。
　　 11月14日（木） 5:43:17　　 　　41107
鯨鯢(Keigei)
辺に接する「ル」から「サ」を通って「マ」に行く方法は３通り、
従ってこの「ル」を通る「マサルサマ」は ３×３＝９通り、
中央に近い「ル」から「サ」を通って「マ」に行く方法は４通り、
従ってこの「ル」を通る「マサルサマ」は ４×４＝１６通り、
いずれの「ル」も４個ずつあるから、(９＋１６)×４＝１００ 通りです。
　　 11月14日（木） 6:04:59　　 　　41108
ハラギャーテイ
おはようございます。認証だよりでした。すみません。こんなにたくさんあるとは思いませんでした。
山口　　 11月14日（木） 6:25:48　　 HomePage:制御工学にチャレンジ　　41109
takasi
「ル」を決めて、隣り合う「サ」から1回目2回目に通るものを決めれば1つに定まるので
4*3^2+4*4^2=100ですね
　　 11月14日（木） 9:12:29　　 　　41110
uchinyan
はい，こんにちは。さて，今回の問題は．．．
これは，一瞬，難しそうに見えましたが，ちょっと考えると簡単でした。こんな感じで。

少し試してみれば，マサルサマの二番目のサの後のマは一意に決まることが分かります。
そこで，ルの後のサの個数だけあります。
したがって，最初のマの回りのサの回りのルの回りのサの個数を足し上げればいいです。
マは隅に 4 個と中央に 1 個あるので，対称性を考慮して，
(3 + 4) * 2 * 4 + (3 + 4 + 4) * 4 = 56 + 44 = 100 通り
になります。

最初，目がチカチカして，マサルサルを数えたりして失礼しました (^^;
ネコの住む家　　 11月14日（木） 12:31:42　　 MAIL:uchi@sco.bekkoame.ne.jp 　　41111
uchinyan
掲示板を読みました。
数え方は様々ですが，皆さん何らかの規則性を見つけてそれに基づいて数える，という解法のようですね。
ネコの住む家　　 11月14日（木） 12:40:55　　 MAIL:uchi@sco.bekkoame.ne.jp 　　41112
Ｊママ
こんにちは♪
昨日からみんな熱心な「マサル教」？信者ですねw
マサルサマ、マサルサマ、マサルサマ…
　　 11月14日（木） 13:37:25　　 　　41113
あめい
みなさん、マサルサマの回文にはまっているようですね。自分もそうで、何度か唱えていました。
関係ありませんが、お気に入りの回文は、中島みゆきさんの歌に出ていた「ヨノナカバカナノヨ」と皇太子ご成婚時の「オワダマサコサマダワオ」です。
　　 11月14日（木） 17:38:00　　 　　41114
???
ちょっと長いですが，EXCELのマクロです．
Option Explicit: Dim a(4) As Integer, x As Integer, y As Integer
Sub Macro1()
Cells(1, 1).Value = 0
For y = 1 To 5
For x = 1 To 5
If masarusama(x, y) = masaru(1) Then Call saiki(1)
Next x
Next y
End Sub
Sub saiki(ByVal n As Integer)
Dim xx As Integer, yy As Integer, j As Integer
a(n) = 1
While a(n) <= 4
xx = x: yy = y
For j = 1 To n
Select Case a(j)
Case 1: xx = xx + 1
Case 2: yy = yy + 1
Case 3: xx = xx - 1
Case Else: yy = yy - 1
End Select
Next j
If 1 <= xx And xx <= 5 And 1 <= yy And yy <= 5 Then
If masarusama(xx, yy) = masaru(n + 1) Then
If n < 4 Then
Call saiki(n + 1)
Else
Call hyouji(1)
End If
End If
End If
a(n) = a(n) + 1
Wend
End Sub
Sub hyouji(ByVal p As Integer)
Dim gyou As Integer, xx As Integer, yy As Integer
Dim j As Integer, jj As Integer
Cells(1, 1).Value = Cells(1, 1).Value + 1
gyou = Cells(1, 1).Value * (5 + 1) - 5
For j = 1 To 5
For jj = 1 To 5
Cells(gyou + jj - 1, j + 1).Value = masarusama(jj, j)
Next jj
Next j
For j = 0 To 4
If j = 0 Then
xx = x: yy = y
Call keisen(xx + 1, gyou + yy - 1)
Else
Select Case a(j)
Case 1: xx = xx + 1
Case 2: yy = yy + 1
Case 3: xx = xx - 1
Case Else: yy = yy - 1
End Select
End If
Call yellow(xx + 1, gyou + yy - 1)
Next j
End Sub
Sub keisen(ByVal retsu As Integer, ByVal gyou As Integer)
Range(r(retsu) & strr(gyou)).Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlInsideVertical)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlInsideHorizontal)
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
End Sub
Sub yellow(ByVal retsu As Integer, ByVal gyou As Integer)
Range(r(retsu) & strr(gyou)).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub
Private Function r(ByVal retsu As Integer) As String
Select Case retsu
Case 2: r = "B"
Case 3: r = "C"
Case 4: r = "D"
Case 5: r = "E"
Case Else: r = "F"
End Select
End Function
Private Function masarusama(ByVal x As Integer, ByVal y As Integer) As String
Select Case y
Case 1: masarusama = Mid("マサルサマ", x, 1)
Case 2: masarusama = Mid("サルサルサ", x, 1)
Case 3: masarusama = Mid("ルサマサル", x, 1)
Case 4: masarusama = Mid("サルサルサ", x, 1)
Case Else: masarusama = Mid("マサルサマ", x, 1)
End Select
End Function
Private Function masaru(ByVal n As Integer) As String
Select Case n
Case 1, 5: masaru = "マ"
Case 2, 4: masaru = "サ"
Case Else: masaru = "ル"
End Select
End Function
Private Function strr(ByVal n As Integer) As String
strr = Right(Str(n), Len(Str(n)) - 1)
End Function
　　 11月14日（木） 18:27:12　　 　　41115
数樂
たまたまあったようです。
はじめは最短経路で解きました。
マス目をマからマに行く順路を見つけて…
おそらくたまたまあったと思うので、解き方は消しました。

違う方法を考えた結果
4隅　56通り　中央　44通りです。
徳島　　 11月15日（金） 10:45:14　　 HomePage:数樂　　41119
pao
周囲4つのうち一つの「ル」から「マ」までが3通り往復で9通り
内側4つのうち一つの「ル」から「マ」までが4通り往復で16通り
それぞれ4つあるので、（9+16)×4=100通り
　　 11月16日（土） 22:34:46　　 　　41120
大岡　敏幸
今回は地道に。４隅からスタート１４×４＝５６　真ん中から４隅へ　６×４＝２４　真ん中から真ん中へ戻る　２０（数え上げ）Ｕターン　４　サークル　８　「ル」で戻る　８
合計　５６＋２４＋２０＝１００　　うーん、何となく面倒な・・・。　
でも、算数らしかったと自己満足です。（＾＾；
石川県　　 11月17日（日） 23:14:04　　 　　41121