あみー
174ってやっちゃった
やっぱ落ち着かないと間違うねえ、場合の数
内緒　　 5月28日（木） 0:08:44　　 MAIL:amimorisama@hotmail.com 　　34534
Taro
正解送ったつもりが152と押し間違え、送信規制orz
市のはずれ　　 5月28日（木） 0:14:31　　 　　34535
ちゃーみー
132 にしてしまいました。同じ桁が重複するのを忘れていた。
一発ではかなりあたりにくい問題だと思います。
とうきょうとせたがやく　　 5月28日（木） 0:16:25　　 MAIL:kakuromaster@star.cims.jp 　　34536
おかひで博士
書き出したのですが、何かあるのかな・・・？
兵庫県　　 5月28日（木） 0:20:50　　 　　34537
吉川マサル
この問題、ちゃーみーさんのご指摘通り、一発で正解するのはかなり難しい問題ですよね。ちなみに私は「313」みたいなパターンを忘れてました。確認のつもりでプログラム組んだら想定外の数字が出て気づきました。

　これ、例えば合否を判定する入試で出題するのはちょっとNGじゃないかと思います。何度も挑戦でき、かつ速さを競うという楽しみ方「も」ある算チャレならではの出題なのではないかと、我ながら思っていたりします。（良問であるかどうかは別問題として）
iMac　　 5月28日（木） 0:21:20　　 HomePage:blog　　34538
SUPER SPECIAL SEMTEX
全部書きました
なんか良いやり方ありますか
アナタのすぐ後ろ・・・　　 5月28日（木） 0:23:44　　 　　34539
おかひで博士
きちんと調べていく、という意味では良問だと思います
１５○.□のようなときに１５６はあるけど、１５７がないなど、
面白みもあるかな、と
兵庫県　　 5月28日（木） 0:25:58　　 　　34540
むらい
最初は、小数第１位が１〜４の場合と５・６の場合で場合わけしようと
思いましたがどうにもうまくいかず
結局１２３から６５４まで全部書き出しました。
１００台だけ調べて楽しようと思ったら深みにはまってしまいました。
途中で規則性に気づくと思ったけど気づかず断念。
サイタマ　　 5月28日（木） 0:34:59　　 　　34541
ゴンとも
プログラムで以下の162個が答え

123 124 125 126 127 132 133 134 135 136 137 142 143 144 145 146 147 152 153 154
155 156 162 163 164 165 213 214 215 216 217 231 232 234 235 236 237 241 242 243
244 245 246 247 251 252 253 254 255 256 261 262 263 264 265 312 313 314 315 316
317 321 322 324 325 326 327 341 342 343 345 346 347 351 352 353 354 355 356 361
362 363 364 365 412 413 414 415 416 417 421 422 423 424 425 426 427 431 432 433
435 436 437 451 452 453 454 456 461 462 463 464 465 512 513 514 515 516 521 522
523 524 525 526 531 532 533 534 535 536 541 542 543 544 546 561 562 563 564 612
613 614 615 621 622 623 624 625 631 632 633 634 635 641 642 643 644 645 651 652
653 654
豊川市　　 5月28日（木） 0:39:36　　 MAIL:fttnm528@ybb.ne.jp 　　34542
Mr.ダンディ
下記のように場合わけしました。

(イ) 上３桁が何であっても繰上りがないことがあるので、1〜6から3つとった順列になる場合　・・・　6Ｐ3（通り）
(ロ) ●●６.５→●●７　となるパターン　・・・4Ｐ2＝12（通り）
(ハ)
２□1.(5or6)→２□２　,□２１.(5or6)→□２２　となる場合 ・・・ 4×2＝8（通り）
３□２.(5or6)→３□３　,□３２.(5or6) →□３３　となる場合 ・・・ 4×2＝8（通り）
４□３.(5or6)→４□４　,□４３.(5or6) →□４４　となる場合 ・・・ 4×2＝8（通り）
５□４.(6)→５□５　,□５４.(6)→□５５　となる場合 ・・・ 3×2＝6（通り）
（※最後の場合だけ、□に6が入らず、3×2＝6）

よって、6Ｐ3＋4Ｐ2＋8*3＋6＝162（通り）
（初め、※の部分を見落とし　164通りとしてしまいました）
大阪　　 5月28日（木） 1:50:13　　 　　34543
圭太
最初6枚ずつあると勘違い＾＾；
結局全部書き出しました。
6枚ずつあったら、少し書き出すのも大変かな。
（4枚ずつで十分ですけど）
天地人　　 5月28日（木） 1:17:25　　 　　34544
小西孝一
おはようございます。
夜中に目が覚めました。
超ど田舎　　 5月28日（木） 1:55:10　　 　　34545
小西孝一
１２０通り＋○２２、２○２・・・、○○７
○５５、５○５の時気をつけて
120+6*4+3*2+4*2=162
でした。
超ど田舎　　 5月28日（木） 1:59:13　　 　　34546
小西孝一
名前でない（Ｔ＿Ｔ）
二回送ってしまった。ＯＴＬ
超ど田舎　　 5月28日（木） 2:03:47　　 　　34547
BossF
#34543
＞２□1.(5or6)→２□２　,□２１.(5or6)→□２２　となる場合 ・・・ 4×2＝8（通り）
四角に入るのは3通り→12通りでは？と勘違い
212.5 212.6 232.5 232.6 242.5 242.6 252.6 262.5
う〜ん　確かに8通りだ、あほじゃぁ！！！
root of isle　　 5月28日（木） 2:04:53　　 MAIL:fv2f-ftk@asahi-net.or.jp HomePage:fv2f-ftk@asahi-net.or.jp　　34548
みかん
最初１００番台だけ調べて２６通りとなったので、その６倍と見て１５６通りと
したらあっさりハズレ。そんなに外れてはなかろうと認証作戦に切り替え
ました（スミマセン）。

１〜５が各１枚（計５枚）のカードで、「２桁＋小数点以下１桁」でやった
場合は何通りでしょう？　これくらいなら数え上げの問題として算数でも
ちょうどよさそうです。

(#34524)
立体図形の重なり、イメージでなんとなく解くのは危険ですね。予想外の
結果が出てきて驚きました。

　　 5月28日（木） 2:16:37　　 　　34549
小西孝一
○６６と６○６は、無いと書き忘れました。
すみません。
超ど田舎　　 5月28日（木） 2:20:21　　 　　34550
小西孝一
書き間違えてる（Ｔ＿Ｔ）書き直します。
１２０通り＋○２２、２○２・・○４４、４○４、○５５、５○５、○○７
○５５、５○５の時気をつけて
120+6*4+3*2+4*3=162
でした。
超ど田舎　　 5月28日（木） 2:49:26　　 　　34551
小西孝一
Mr.ダンディ様
と同じでした。（掲示板よく読まなくてごめんなさい）
超ど田舎　　 5月28日（木） 2:57:26　　 　　34552
スモークマン
昨日入れず...今朝高速飛ばしながら考えた数値を入れたらビンゴ♪
すべて異なる数字可能：6*5*4=120
2,3,4が2個のもの：21,32,43：小数点は、５か6: 4*3*2=24
5が2個のもの：54：小数点は、6：3*2=6
新たな数字7ができるもの：１の桁の数字が6：小数点は5：4*3=12
120+24+6+12=162
金光＠岡山　　 5月28日（木） 8:40:50　　 　　34553
ルルゥ
1)すべて異なる数字の場合→120通り
2)十の位と一の位が同じ場合→15通り
3)百の位と一の位が同じ場合→15通り
4)一の位が7の場合→12通り
よって
120+15+15+12=162
　　 5月28日（木） 9:05:05　　 　　34554
???
Option Explicit
Sub Macro1()
Dim x(654) As Integer
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim d As Integer
Dim j As Integer
For j = 123 To 654
x(j) = 0
Next j
For a = 1 To 6
For b = 1 To 6
If a <> b Then
For c = 1 To 6
If a <> c And b <> c Then
For d = 1 To 6
If a <> d And b <> d And c <> d Then
x(Application.Round(a * 100 + b * 10 + c + d / 10, 0)) = 1
End If
Next d
End If
Next c
End If
Next b
Next a
Cells(1, 1).Value = 0
For j = 123 To 654
If x(j) Then
Cells(1, 1).Value = Cells(1, 1).Value + 1
Cells(Cells(1, 1).Value, 2).Value = j
Range("B" & Cells(1, 1).Value).Select
End If
Next j
Range("A1").Select
End Sub
　　 5月28日（木） 9:05:32　　 　　34555
Mr.ダンディ
#34552　　> （掲示板よく読まなくてごめんなさい）
小西孝一さん。お互いさまですから、気になさらずに！
（そのことより、[訂正]や[削除]の機能を使うと便利ですよ）

#34544
> 6枚ずつあったら、少し書き出すのも大変かな。 （4枚ずつで十分ですけど）
この場合だと単純で、6×6×7 で求まりますね。

今回の問題は、1〜5でも 1〜7でもなく「1〜6 の6枚」と設定することにより、面白味のあるものになっていますね。
（シンプルだがスパイスの効いた良い問題だと思います）
大阪　　 5月28日（木） 9:18:15　　 　　34556
abcba@jugglermoka
3桁の整数の上2桁の組み合わせで考えました。
(26+24+17+10+4)×2=162
　　 5月28日（木） 9:24:02　　 　　34557
小西孝一
#34556Mr.ダンディ様
ありがとうございます。今回パスワードを設定してなかったので、できま
せんでした。次回から、使います。^^
超ど田舎　　 5月28日（木） 11:07:07　　 　　34559
uchinyan
はい，こんにちは。さて，今回の問題は．．．
一目見て「プログラム組んじゃえば終わり。」とは思いましたが，いつものように頭の中で考え出しました。
ただ，さすがに暗算では少しキツク，一回目は数え足らず(156 通り)でアウト。一応こんな感じで。

小数点以下第一位の数字，エ，に注目します。
(1) アイウ.1 の場合
小数点以下第一位は切り捨てで，整数は アイウ になります。これは，5 * 4 * 3 = 60 通り。
(2) アイウ.2 の場合
同じく，整数は アイウ ですが，ア，イ，ウの中に 1 がない場合は(1)に含まれ，1 がある場合だけを考えればよく，追加は 4C2 * 3! = 36 通り。
(3) アイウ.3 の場合
同じく，整数は アイウ で，ア，イ，ウの中に 1, 2 がある場合だけを考えればよく，追加は 3C1 * 3! = 18 通り。
(4) アイウ.4 の場合
同じく，整数は アイウ で，ア，イ，ウの中に 1, 2, 3 がある場合だけを考えればよく，追加は 3! = 6 通り。
(5) アイウ.5 の場合
小数点以下第一位は切り上げで，整数は アイ(ウ＋１)，ウ＋１ は 7 以下，になります。
このとき，ア，イ，ウ＋１ がすべて異なり，ウ＋１ が 7 でない場合は，(1) 〜 (4) に含まれます。
そこで，考える必要があるのは次の場合だけです。なお，5 は使えないことに注意。
(5-1) ウ＋１ = ア 又は ウ＋1 = イ の場合
ウ＋１ = 2, 3, 4，要するに，2イ2，ア22，3イ3，ア33，4イ4，ア44 だけ，が可能なので，3 * 2 * 3 = 18 通り。
(5-2) ウ＋１ = 7 の場合
アイ7 の場合で，4 * 3 = 12 通り。
結局，(5) の場合で追加は，18 + 12 = 30 通り。
(6) アイウ.6 の場合
同じく，整数は アイ(ウ＋１) になり，ウ＋１ は 6 以下なので，ア，イ，ウ＋１ がすべて異なる場合は，(1) 〜 (4) に含まれます。
そこで，ウ＋１ = ア 又は ウ＋1 = イ の場合だけを考えればいいですが，6 は使えないので，結局，次の場合だけです。
(6-1) ウ＋１ = 2, 3, 4 の場合
残りの数字が 5 以外は(5)に含まれるので，252，522，353，533，454，544 だけで，6 通り。
(6-2) ウ＋１ = 5 の場合
5イ5，ア55 なので，3 * 2 = 6 通り。
結局，(6) の場合で追加は，6 + 6 = 12 通り。
以上の (1) 〜 (6) ですべてなので，
60 + 36 + 18 + 6 + 30 + 12 = 162 通り
になります。

最初の間違いの 156 通りは，(6-1)を見落としていました (^^;
ネコの住む家　　 5月28日（木） 22:55:33　　 MAIL:uchi@sco.bekkoame.ne.jp 　　34560
uchinyan
掲示板を読みました。今回は皆さん苦労なさったようですね。

#34537，#34539，#34541，#34544，#34549(＋認証)
書き出してみる解法。

#34542，#34555
プログラムによる解法。

#34543，#34546，？#34548，#34553，#34554
最初の数の整数部分に繰り上がりがなく得られる整数の桁の数字がすべて異なっている場合，
得られる整数の下一桁が７になる場合，得られる整数の桁の数字に同じ数字がある場合，
で場合分けする解法。

#34557
＞3桁の整数の上2桁の組み合わせで考えました。
という解法。

#34560
最初の数の小数点以下第一位の数字で場合分けする解法。
結局は，#34543などと同じようになりますが，着眼点が若干違うので，別分類にしました。
ネコの住む家　　 5月28日（木） 12:37:38　　 MAIL:uchi@sco.bekkoame.ne.jp 　　34561
takumi
むずかしい　

�〃�り上がらずに３桁ともばらばらの数字になるパターンを考えると、仮に１、２、３、４のうちの三つが一の位、十の位、百の位に入っても、小数第１位には繰り上がらない数が入りえるので、場合の数は単純に６×５×４＝１２０通り
��繰り上がるが３けたともばらばらの数になるときは、１の位が６で、小数第１位が５の時しかないので、百と十の位に１、２、３、４のいずれかが入ればよいので単純に４×３＝１２通り
�７�り上がって3桁のうち２つが同じ数になるパターンを考えると、小数第１位は５か６で、かつ一の位に１足した数が十か百の位になければならない。
　（１）小数第１位が５でかつ一の位の数に１足した数が十の位にあるパターンは（□□□.□）＝（□２１.５）（□３２.５）（□４３.５）　　３×３＝９
　（２）小数第１位が５でかつ一の位の数に１足した数が百の位にあるパターンは上記（１）と同じ組合せで９パターン
　（３）小数小第１位が６でかつ一の位の数に１足した数が十の位にあるパターンは（□□□.□）＝（□２１.６）（□３２.６）（□４３.６）（□５４.６）で３×４＝１２通り
　（４）小数小第１位が６でかつ一の位の数に１足した数が百の位にあるパターンは（３）と同様に１２通り
�ぞ綉�をたすと１７４通り。�，鉢�、�△鉢い覇韻舷瑤�できる322,422,133,433,144,244,232,242,312,342,413,423の12通り
これを１７４から引くと１６２通り

あーしんど
　　 5月28日（木） 17:25:38　　 　　34562
ハラギャーテイ
プログラムです。水戸に行って帰ってきました。歳をとると旅は疲れます。

山口　　 5月28日（木） 18:31:33　　 HomePage:制御工学にチャレンジ　　34563
kawa
最近、十進ベーシックをかじりだしたものですけど
下記のプログラムではすべてをプリントして同じ値を複数
表します。どのようにすると１つずつプリントするようになるのでしょうか？　よろしかったら教えてください。
FOR a=1 TO 6
FOR b=1 TO 6
IF b=a THEN GOTO 30
FOR c=1 TO 6
IF c=a OR c=b THEN GOTO 20
FOR d=1 TO 6
IF d=a OR d=b OR d=c THEN GOTO 10
LET p=100*a+10*b+c+0.1*d
LET q=ROUND(p,0)
PRINT q
10 NEXT d
20 NEXT c
30 NEXT b
40 NEXT a
END
　　 5月28日（木） 19:55:34　　 　　34564
鯨鯢(Keigei)
#34564
私は、十進ベーシックはよく分からないのですが、BASICの経験から、
PRINT q の
前に、「IF q<>s THEN」の１行を、
後に、「LET s=q」と「END IF」の２行を、
それぞれ挿入すれば、できるはずです。
中将棋盤から　　 5月28日（木） 21:15:23　　 　　34566
kawa
鯨鯢(Keigei)さん、ありがとうございました。
これですっきりしました。
もっと勉強したいと思います。
　　 5月28日（木） 21:48:05　　 　　34567
黒アイス
もうすぐ梅雨なのかなーーー。

切り捨てでできる数は6＊5＊4＝120(通り)
ここに、切り上げでのみできる数を加えていく。
��2つの位の数が同じになる。
（a,b,a-1,5or6),(b,a,a-1,5or6)の2通りがある。
a=2,3,4のとき・・・4+4+4＝12(通り)
a=5のとき・・・3通り
よって、(12+3)＊2＝30(通り)

��1の位が7
(a,b,6,5)のときのみ
4＊3＝12（通り）

よって、できる3桁の整数は120+30+12＝162(通り)である。
　　 5月28日（木） 22:47:51　　 　　34568
黒アイス
これマサルさんと他の解答者の皆さんに質問なんですけど・・・
過去問の問題でどうして新しい方の図形問題の図が出ないのでしょうか。
今だと第647回の問題が出ません。
それともこれって私のパソコン限定ですか。
　　 5月28日（木） 22:57:49　　 　　34569
ばち丸
樹形図を描いて一生懸命数えました。何度も間違えて。
　　 5月29日（金） 1:12:27　　 　　34571
けろろ
２回間違いましたがなんとか正解にたどりついた。2時間かかった。
　　 5月29日（金） 16:41:17　　 　　34572
万打無
四捨五入後の１の位は１〜７まで考えられます。
上二桁の組み合わせを全て書き出して、四捨五入後の１の位として１〜７までの数になりえないものの個数を書き出したところ、その合計が48になりました。
（上二桁の組み合わせの数＝30）×7=210
よって210-48=162　が答えになります。
　　 5月30日（土） 11:16:45　　 　　34573
R.UFO
ばち丸さん、同じやり方です。162と数えてしまいました。
　　 5月30日（土） 17:28:23　　 MAIL:keelzonker@yahoo.co.jp 　　34574
ｇｇ
有り得る物を全て書き出す。根性です。
式で解く解法が分かりませんでした。疲れた＾
　　 5月31日（日） 11:17:45　　 　　34575
英ちゃん
解くのを忘れてました
6*5*4+12*3+6=162です
居間　　 5月31日（日） 17:53:57　　 HomePage:ブログ　　34576
大岡　敏幸
数え上げでしました。疲れます。
百の位を１として数えたた２６通り。単純に２６×６＝１５６　あえなく撃沈。頭脳系というより作業系になりつつ最近。
石川県　　 6月1日（月） 21:55:40　　 　　34577
あみー
各位が１〜６で異なる数　120通り
一の位が７になるもの　12通り
２□２や□２２　各４通り×６
５□５や□５５　各３通り×２
ですか。

各４通りを各６通りとしてしまい，自滅。
内緒　　 6月2日（火） 0:06:20　　 MAIL:amimorisama@hotmail.com 　　34578
小西孝一
あさって。
姉より先に解けるかな？
ど田舎　　 6月2日（火） 13:32:03　　 　　34579