『忠犬もちしば』のAIを育てるとグッズが貰える!>>

XPを使用しています。
ビンゴでよく使用する5×5のマス目で60までのランダムな数値が入っています。RAND関数=roundup(rand()*60,0)を使い挿入しています。
しかし、どうしても重複した数値が入ってしまいます。
重複しないためにはどうしたらよいか・・・(-_-;)
子ども会で100名ほどに印刷して切って使う予定にしています。どなたか、ご存知でしたら、教えてください。よろしくお願いします。

このQ&Aに関連する最新のQ&A

A 回答 (5件)

#3の方に似ているような、似てないような方法ですが、



(1)G1セル =RAND()
   と入力し、G60セルまでコピー
(2)A1セル =MATCH(SMALL($G$1:$G$60,(COLUMN()-1)*5+ROW()),$G$1:$G$60,0)
   と入力し、E5セルまでコピー

でF9(再計算)を押すたび1~60までがランダムに表示されます。

#4さんの考え方で、
A列:1~12
B列:13~24
C列:25~36
D列:37~48
E列:49~60
ならば
A1セルに =MATCH(SMALL(OFFSET($G$1,(COLUMN()-1)*12,0):OFFSET($G$12,(COLUMN()-1)*12,0),ROW()),$G$1:$G$60,0)
でE5セルまでコピーでできると思います。
    • good
    • 1

60までの数値という条件がつく事情がおありでしょうが、


以前同じようにPCでカードを作って大失敗したことがあります。

市販のカードは縦5マスを1セットに考えると
左から右へ以下の範囲で書かれているようです。
左端:1~20
左中:21~40
中央:41~60
右中:61~80
右端:81~100
これを考慮せずに作成したら、数値が結構偏ってまして、
BINGO!が当分でず、最後の方に集中してしまったことがあります。

というわけで、市販のカードの方がお手軽であると思います。
    • good
    • 0

こんにちは。

maruru01です。

作業列を2列使用する方法です。
5×5のマスをA1~E5として、G、H列を作業列とします。

G1~G60まで1、2、3・・・60と連番を振ります。
H1に、

=RAND()

と入力してH60までコピーします。
A1に、

=OFFSET($G$1,COLUMN(A1)-1+(ROW(A1)-1)*5,0,1,1)

と入力して、行・列方向それぞれへコピーします。
あとは、GH列を選択して、H列で並べ替える度に、1~60までの値が重複せずにランダムに表示されます。
(並べ替え操作をするとRAND関数が更新されるので。)
並べ替えごとに印刷するなり、値のみをコピーペーストすればいいでしょう。

ただ、No.1の方が言うように、100名程度なら、本物のビンゴ用紙を買ったほうがいいような・・・
    • good
    • 0

>百円ショップで、ビンゴの用紙を売っていますので、そちらの方が早いかと思います。



たしかに。

私もそう思います。
そうではなくて、趣味や知識のひとつとして、VBAでのランダムな数値を取得するテクニックを知りたいということでしたら、また補足してください。
    • good
    • 0

すみません。



回答ではありません。ご質問の事をするとしたら、VBAでプログラムを書く必要があります。大変な労力が必要になります。

百円ショップで、ビンゴの用紙を売っていますので、そちらの方が早いかと思います。
    • good
    • 0

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qビンゴの作り方

33人でビンゴをするのには、何マスでいくつの数字を使用するとよいでしょうか。

Aベストアンサー

パーティの際に行うビンゴゲームのことですね?一般的には数字を出す方の機械が75までで市販のカードがそれに準じて5*5の25マスに振り分けられています。(但し真中は最初から穴があけられています)この市販のものを使わずにするといこうことで考えると、まず目的が何かということ(景品をプレゼントするため、単なる競技として)それと時間どの程度費やせるかということです。一般的にはやはり前記の通5*5で数字は75までが良いと思います。(市販のカードは一番左の行が1-15、左から2番目が16-30、真中が31-45、右から2番目が46-60、一番右が61-75の中から数字が割り当てられてます)数字は多くて100迄マスは少なくても4*4くらいがぶなんかと思います。海外ではビンゴもルーレット等と同じようなカジノゲームの一種で私がラスベガスに行った時もありました。

QVBAで,ビンゴゲームの数字の生成方法

初心者です。

ビンゴゲームをつくりたいと思っています。
EXCELのVBAでつくりたいと思っていますが,最初の取りかかりで早くも困っています。

ボタンをクリックするごとに,数字が出てくるようにしたいのですが,その良い方法が思い当たりません。

「1~100までの数字をランダムに出したい。但し,一度出た数字は二度と出ないようにしたい。」

私の知恵では,EXCELのVBAだから,EXCELのシートで乱数を入れて,ソートをするか,又は大量のIF文を使うくらいしか思いつかないのいです。

良い方法があればどなたか教えてください。

よろしくお願いいたします。

Aベストアンサー

作業用のワークシートを用いない方法の一例です。xl2000用のコードですが、ご参考まで。
なお、実用上は問題ないと思いますが、試験の際に、ボタンのクリック間隔が短いと追従できない事がある様です。
ユーザーフォームにラベル1個と、コマンドボタン1個を置きます。
☆標準モジュール
Sub test()
'Application.Visible = False 'Excelを隠す
UserForm1.Show
'Application.Visible = True
End Sub


☆Userform1モジュール
Dim numCollection As Collection
Const maxNum As Long = 75

Private Sub CommandButton1_Click()
Dim num As Long

If numCollection.Count = 0 Then
Me.Label1.Caption = "終了"
Exit Sub
End If
num = Int(Rnd() * numCollection.Count) + 1
Me.Label1.Caption = numCollection.Item(num)
numCollection.Remove (num)
End Sub

Private Sub UserForm_Initialize()
Dim i As Long

Me.Label1.Caption = "BINGO"
Set numCollection = New Collection
Randomize Time
For i = 1 To maxNum
numCollection.Add Item:=CStr(i)
Next i
End Sub

collectionオブジェクトについては、Web検索しても上位に詳しい記事がヒットしないので、VBAのヘルプをご覧下さい。

作業用のワークシートを用いない方法の一例です。xl2000用のコードですが、ご参考まで。
なお、実用上は問題ないと思いますが、試験の際に、ボタンのクリック間隔が短いと追従できない事がある様です。
ユーザーフォームにラベル1個と、コマンドボタン1個を置きます。
☆標準モジュール
Sub test()
'Application.Visible = False 'Excelを隠す
UserForm1.Show
'Application.Visible = True
End Sub


☆Userform1モジュール
Dim numCollection As Collection
Const maxNum As Long = 75

Private Sub Comman...続きを読む

Q二次会のビンゴゲーム(3X3)の所要時間は?

友人の結婚式の二次会の幹事をすることになりました。
新婦の希望で、会場にきている人の名前を数字の代わりにカードに書き込むビンゴをすることになったのですが、普通の5X5の用紙だと25人の名前をうめなくてはならず大変なので3X3のものにしようと思っています。
ただ、名前ビンゴと3x3のものをしたことがないので、どれくらい時間がかかるのか予想がつきません。
所要時間は30ー40分の予定なのですが、これで収まるか気になっています。(早く終わり過ぎたり、時間がかかり過ぎたり、回答者が重なり過ぎるようだと普通のビンゴに変更しようかとも思ってます)
どなたか同じようなビンゴをやったことがある方教えて下さい!
ちなみに会場人数は50ー60人。景品は10人分用意してあります。名前の記入は受け付け後ビンゴ開始までにやってもらうつもりなので、所要時間には含まないです。
よろしくおねがいします!

Aベストアンサー

人名ビンゴですか。楽しそう! なつかしいなぁ!(私も経験あり。)
参加者約50人、商品20本で、準備(名前書き)に10分強+読み上げに20分ぐらいに収まりましたね。

Q結婚式の二次会で使う白紙のビンゴカード

結婚式の2次会で幹事をやることになりました。
余興で名前ビンゴをやる予定で、白紙のビンゴカードをさがしています。
ネットで検索したのですが、数字が書かれてあるものはあっても白紙のものは売られていません。
2次会幹事で白紙のビンゴカードを使用したことがある方、どちらで購入されたのか教えていただけますか?
よろしくお願いします。

Aベストアンサー

東急ハンズのパーティー用品コーナーで見かけた事有ります。

Qビンゴでもらって嬉しかった・最悪だった景品教えてください!

来月披露宴を行います。二次会でビンゴゲームをしようと思うのですが、景品が思いつきません。予定の参加者は女性15名、男性15名ほどで年齢は30歳です。最後まであがらなかった人には、高額なものを上げようと思っているのと、景品で購入予定・購入済みのものは、宝くじ、ドライヤー(クルクルドライヤータイプではありません)、おつまみ詰め合わせぐらいです。ドライヤーは2000円のマイナスイオンを発生させるものを購入しました。
景品にも困っているのですが、二次会費というものはお店に払う分以外に上乗せしていただくものなのですか?たとえば、景品を購入するお金とかを。
私は新婦であり主催する側なので、飲食代にプラスしていただくのは普通なのかおかしいのか・・・・?よくわかりません。
30人で行うビンゴゲームの予算っていくらぐらいが楽しめるでしょうか?あまりに安いものばかりを景品にするのは、避けたいです。
自分がもらって嬉しいもの、、、今いろんなこと考えなきゃならなくて思いつきません。
皆さんが過去にもらって嬉しかった景品、教えてください。ユニークなものでも結構です。景品が高額だとチープな景品よりかは盛り上がると聴いたことがあります。(私も同感です)ですが実際にそのような二次会に出たことがありません。絶対に場をしらけさせたくないのです!来月中旬の披露宴ですからあまり時間がありません!!よろしくお願いします

来月披露宴を行います。二次会でビンゴゲームをしようと思うのですが、景品が思いつきません。予定の参加者は女性15名、男性15名ほどで年齢は30歳です。最後まであがらなかった人には、高額なものを上げようと思っているのと、景品で購入予定・購入済みのものは、宝くじ、ドライヤー(クルクルドライヤータイプではありません)、おつまみ詰め合わせぐらいです。ドライヤーは2000円のマイナスイオンを発生させるものを購入しました。
景品にも困っているのですが、二次会費というものはお店に払う分以外に上乗せし...続きを読む

Aベストアンサー

御結婚おめでとうございます!!
楽しい披露宴&二次会になるといいですね。

さて、私がビンゴの景品でよかったと思ったものは
・ディズニーリゾートなどテーマパークのペアチケット
・ブランド品
 →キーケースやアクセサリー、小物など
・カタログギフト(グルメ専門)
・旅行券
などが良かったです。
ちなみに私の友人はいろいろな金券を景品にしてました。
(グルメカード・音楽ギフト券・旅行券・図書券・お米券・ビール券・クオカード などなど)
しかもビンゴに当ったあと、それぞれの金券に関連した
絵や写真がでてきて、その中から、景品を予想して
自分で選ぶという方法で、かなり盛り上がり楽しかったです!
参考になれば幸いです。

逆にもらって困ったものは家電品です。
私の場合ホットプレートが当りましたが、
持っていたのでうれしさ半減でした。
しかももって帰るのが大変でした・・・
重いものや大きいものは持ち帰りに不便なので
避けたほうが良いと思います。

あと、会費ですが、少し上乗せするのは構わないと思いますが、
あまり高い金額にしてしまうと、披露宴から引き続き二次会に出席する場合は、
正直きついのです。(二次会のみ出席なら別ですが・・・)
私のときは、みんなに喜んでもらうため、景品代は
ある程度自分たちで負担しました。

いろいろと準備が大変だと思いますが、
楽しい式になるようがんばって下さい!!

御結婚おめでとうございます!!
楽しい披露宴&二次会になるといいですね。

さて、私がビンゴの景品でよかったと思ったものは
・ディズニーリゾートなどテーマパークのペアチケット
・ブランド品
 →キーケースやアクセサリー、小物など
・カタログギフト(グルメ専門)
・旅行券
などが良かったです。
ちなみに私の友人はいろいろな金券を景品にしてました。
(グルメカード・音楽ギフト券・旅行券・図書券・お米券・ビール券・クオカード などなど)
しかもビンゴに当ったあと、それぞれの金券に関...続きを読む

Qビンゴソフトで数字ではなくひらがなを抽選できるソフトを探しています。

友人の2次会で「参加者の名前ビンゴ」を開催したいと考えております。(ひらがなを抽選して、名前の文字が揃った方がビンゴ)

会場のプロジェクターを使いゲーム進行する予定ですが、ひらがなを抽選できるビンゴソフトがなかなか見つかりません。
実は http://www.pert.co.jp/Bingo/ で名前ビンゴ専用ソフトを見つけたのですが、画面が淋しいので、もっと華やかなものを探しています。機能としては申し分ないのですが。。

どなたか御存知でしたら教えてくださいませ。
有料でも構いませんので。(あまり高額なものは無理ですが^^;
よろしくお願いします。

Aベストアンサー

VECTORのフリーソフトとして、ビンゴゲームのカテゴリ内で上位に紹介
されている【とっすぃ☆しゃっふぉ~】を使ってはいかが。
http://www.vector.co.jp/soft/winnt/game/se456829.html
http://www.forest.impress.co.jp/article/2008/06/19/okiniiri.html
http://kaqule-app-sqr.seesaa.net/category/4900315-1.html
画像をランダムに表示するビンゴゲームですから、この画像にひらがな
があるものを用意して、さらに友人が関係するような[いろはカルタ]風
の画像にすれば楽しさも増しますし、華やかさなどもある程度出せると
思います(画像加工のセンスは必要ですが)。

さらに同じ方が作成した【とっすぃ☆ぱねる】を使えば、用意した景品
をランダムに配置して番号で選ぶこともできますからね。
http://www.vector.co.jp/soft/winnt/game/se456828.html
http://kaqule-app-sqr.seesaa.net/category/4900323-1.html

ちなみに、上記作者が紹介している[フェイスビンゴ]などで楽しむのも
2次会での楽しみ方かもしれませんね。
http://kaqule-app-sqr.seesaa.net/article/100163895.html

VECTORのフリーソフトとして、ビンゴゲームのカテゴリ内で上位に紹介
されている【とっすぃ☆しゃっふぉ~】を使ってはいかが。
http://www.vector.co.jp/soft/winnt/game/se456829.html
http://www.forest.impress.co.jp/article/2008/06/19/okiniiri.html
http://kaqule-app-sqr.seesaa.net/category/4900315-1.html
画像をランダムに表示するビンゴゲームですから、この画像にひらがな
があるものを用意して、さらに友人が関係するような[いろはカルタ]風
の画像にすれば楽しさも増しますし、華やかさな...続きを読む

Q数字以外のビンゴカード

来週、気の合う女性どうしで新年会を開くことになり、ビンゴゲームを新年会の合間に入れることにしました。


ビンゴゲームは、全75の数字が各列15刻み(B列は1~15、I列は16~30など)でランダムに配列されているのが、一番普通と思いますが、自分自身が、パソコンで名刺やシールを作ることが好きなために、エクセルで自作し、さらに、時間面への考慮と、数字はありふれていると思い、どうせ自作なら面白みを入れようと、今までやってきた変わったビンゴに、名前ビンゴというのがありましたが、名前は人によって文字数が違う、同じ文字があるなどで不公平になる(例:徳川家康(とくがわいえやす)と毛利元就(もうりもとなり)なら、文字数が少ない・同じ文字がある毛利元就のほうが有利になる)等の意味で却下し、戦国武将(含・歴史の出来事と日本の名城)で仮作成をしてみました。


自作で作られた人や、白紙のビンゴカードを使って、数字以外のビンゴをされた人、見たことがある人にお聞きしたいのですが、そういうものを使って、数字の代わりに名詞をマスに入れることもビンゴとしてはありなのかなと、個人的には思うのですが、白紙カードなどは、誰かがあらかじめ書いてそれを渡すイメージがありました。(例えば、作成者が歴史好きなら戦国武将名を、ディズニー好きの作成者なら、ディズニーのキャラ名をマスに書くなど、好きなジャンル名をどうしても書いてしまいがち?)


使ったことがある人は、どのような言葉を入れてされましたでしょうか?また、遊ばれた人は、それで「相手から好みを押し付けられた」と感じましたでしょうか?

そして、作成者は、面白さを入れる反面、そのリスクも考えてあまり自作や白紙は使用しないほうがいいのでしょうか?

参考までに、教えていただけたらと思います。

来週、気の合う女性どうしで新年会を開くことになり、ビンゴゲームを新年会の合間に入れることにしました。


ビンゴゲームは、全75の数字が各列15刻み(B列は1~15、I列は16~30など)でランダムに配列されているのが、一番普通と思いますが、自分自身が、パソコンで名刺やシールを作ることが好きなために、エクセルで自作し、さらに、時間面への考慮と、数字はありふれていると思い、どうせ自作なら面白みを入れようと、今までやってきた変わったビンゴに、名前ビンゴというのがありましたが、名前は人...続きを読む

Aベストアンサー

自作というと、昔結婚式の二次会で「名前ビンゴ」したことあります。
会場に入るとき新郎新婦へのメッセージをビデオ撮影、
その後白紙のビンゴカードを渡されました。
主賓挨拶の後、周辺にいる人に名前を聞いて、一マスに一人の名前を記入。
「今からお祝いメッセージを流します!」と、
メッセージビデオを抽選器具に見立てて、ビデオが流れる=当たり。
ビデオが流された人が一列分そろったらビンゴ!というものでした。
今回は適さないと思いますが、とてもステキでしたよ。


キャラ物は趣味によるところも大きいので、
正直名前が分からなくて戸惑ってしまうんじゃないかな?
私もディズニーのキャラとか戦国武将が書かれても、
個人的な思い入れはないので黙々やることになりそう…
が、ドラえもん・ひみつ道具ビンゴは面白かったですね。
「こんなのもあったよね~、懐かし~」みたいな感じ。
自分が興味あるテーマじゃないと、手の込んだ単なるビンゴゲームだと思います。


むしろ3×3の枠にして、
“○○なもの(赤いもの・カッコイイと思う芸能人・魚etc…)”
とかのテーマに沿って埋めてもらってやっても面白いかなぁとも思います。
抽選する代わりに順番にひとつ言っていってもらって。
「××~!」「それ違うだろ!!」みたいな盛り上がりがありそう。
ただこれは、ごく少人数じゃないと難しいのと、
ちょっと説明が大変になっちゃうとは思いますが。

自作というと、昔結婚式の二次会で「名前ビンゴ」したことあります。
会場に入るとき新郎新婦へのメッセージをビデオ撮影、
その後白紙のビンゴカードを渡されました。
主賓挨拶の後、周辺にいる人に名前を聞いて、一マスに一人の名前を記入。
「今からお祝いメッセージを流します!」と、
メッセージビデオを抽選器具に見立てて、ビデオが流れる=当たり。
ビデオが流された人が一列分そろったらビンゴ!というものでした。
今回は適さないと思いますが、とてもステキでしたよ。


キャラ物は趣味によるところも...続きを読む

Qエクセルで複数のセルをランダムに並べ替えるには?

方法があるのかないのか分かりません
 
エクセルで、数字ではない文字の入った複数のセルをランダムに並び替える方法を知りませんか?
「昇順」、「降順」キーを使えばその通りに並べ替えできるのですが、同様に「ランダム」キーがあって、それを押すとランダムに並べ替えが出来るみたいに簡単に出来る方法はないでしょうか、乱数を発生させる関数を使えば出来るようですが、ちょっと分かりずらく難しいです、
誰か、教えてください

Aベストアンサー

関数だけでは難しいと思います。
いわゆるシャッフルですよね。
例えば次のように行います。
A1~A9まで、田中、鈴木、木村・・・、と名前を入れます。
B1~B9まで、=RAND() と入れます。
すると、B1~B9には、0.987、0.643、0.2122・・・と、乱数が表示されます。
そこで、B1をキーにして、並べ替えを行います。
とすれば、実質A列をシャッフルできます。

参考URL:http://homepage2.nifty.com/mako-chan/excel/excel9.htm

Qエクセル 表を大きく、紙いっぱいに印刷したい

エクセルで表を作りました。
印刷プレビューで確認したところ
用紙に対して表が小さく見栄えがしません。

一つ一ついじればできると思いますが、
簡単に、
用紙いっぱいにフォントも大きくし、表も大きくし、
印刷するやり方はありますか。
教えてください。

Aベストアンサー

CtrlキーとPのキーを同時に押すと「印刷」ダイアログが呼び出せます。その状態でAltキーとWのキーを同時に押すと「印刷プレビュー」が表示されますので、印刷のイメージがつかめます(必ずしもプレビュー通りには印刷されませんが)
印刷プレビュー画面の上にある、設定のボタンを押してあげれば、余白を少なくしたり、拡大縮小印刷をパーセンテージを指定しておこなえたりします。いずれにせよ、プレビューで確認しながら拡大率を決めていけばいいと思います。なお、「拡大縮小印刷」のところに「次のページ数に合わせて印刷をする」というチェックをいれて横1×縦1にしてあげれば自動で拡大縮小印刷ができる場合がありますが、やってみればわかりますが、特に縮小印刷の場合小さくなりすぎたりする場合もあります。

Qビンゴの確率計算

はじめまして。

ビンゴする確率を教えてください。
ネットで調べたのですが、計算式が大変複雑で挫折しました・・・。
1枚のビンゴカードで、n回目でビンゴする確率が知りたいです。

【ルール】
(1)ビンゴカードは1枚のみ。
(2)真ん中はフリーで最初から空いている。
(3)ランダムに箱の中から1枚取り出し、1度引いた数字は戻さない。
(4)引いた数字と一致した場合は穴を空ける。
(5) (3)・(4)を繰り返す。


【パターンA】数字は35個、6×6のカードで真ん中はフリーの場合。

【パターンB】数字は109個 5×5のカードで真ん中はフリーの場合。


この2パターンでn回目の確率を求めたいのですが、
計算式はどのようになりますでしょうか。


どなたかお知恵をお貸しください。
宜しくお願いします。

Aベストアンサー

パターンAも5×5なら、パターンAとパターンBは数字の数が違うだけで、考え方は同じですから、パターンAの計算の仕方だけ説明します。

n回目までにビンゴしている確率をP(n)とすると、
n回目でビンゴする確率は、P(n)-P(n-1)となるので、P(n)を求めることにする。

P(1)=P(2)=P(3)=0 は明らか

n=4の場合は、ビンゴになるのは中央のフリーを含む縦横斜めの4通りあるので、
P(4)=4/(35C4)

n=5,6,7の場合は、ビンゴになるのは中央を含む4通りと、それ以外の8通りがあるので、
P(5)={4*(31C1)+8}/(35C5)
P(6)={4*(31C2)+8*(30C1)}/(35C6)
P(7)={4*(31C3)+8*(30C2)}/(35C7)

n=8の場合は、{4*(31C4)+8*(30C3)}/(35C8) とすると、ビンゴが2列できている場合を重複して数えているので、それを引いて、
P(8)={4*(31C4)+8*(30C3)-30}/(35C8)

n=9,10の場合も同様に考えて
P(9)={4*(31C5)+8*(30C4)-30*(27C1)-24}/(35C9)
P(10)={4*(31C6)+8*(30C5)-30*(27C2)-24*(26C1)-12}/(35C10)

上記の式にある30,24,12という数は、
ビンゴになる12列から2列選ぶ選びかたは12C2=66通りあり、その内訳は、
8個の穴が空くのは30通り、
9個の穴が空くのは24通り、
10個の穴が空くのは12通り。

n=11の場合は、ビンゴが3列できる場合があるので、これを加減して、
P(11)={4*(31C7)+8*(30C6)-30*(27C3)-24*(26C2)-12*(25C1)+8}/(35C11)

n=12はさらに複雑になって、3列のビンゴで穴が12個になるのは何通りあるかを調べなければならず、これはそう簡単にはできないのでやめておきます。

「k列のビンゴで穴がm個できるのは何通りあるか」が全てのk,mに対して分かればP(n)は計算できますが、これは手作業で数えるのはちょっと無理で、パソコンの力を借りなければならないでしょう。

パターンAも5×5なら、パターンAとパターンBは数字の数が違うだけで、考え方は同じですから、パターンAの計算の仕方だけ説明します。

n回目までにビンゴしている確率をP(n)とすると、
n回目でビンゴする確率は、P(n)-P(n-1)となるので、P(n)を求めることにする。

P(1)=P(2)=P(3)=0 は明らか

n=4の場合は、ビンゴになるのは中央のフリーを含む縦横斜めの4通りあるので、
P(4)=4/(35C4)

n=5,6,7の場合は、ビンゴになるのは中央を含む4通りと、それ以外の8通りがあるので、
P(5)={4*(31C1)+8}/(35C5)
P(6)={...続きを読む


人気Q&Aランキング