[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 11/28 03:01 / Filesize : 280 KB / Number-of Response : 1039
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

プログラミングのお題スレ Part9



1 名前:デフォルトの名無しさん mailto:sage [2016/12/01(木) 16:58:30.97 ID:gTkHDluD.net]
プログラミングのお題スレです。

前スレ
プログラミングのお題スレ Part8©2ch.net
echo.2ch.net/test/read.cgi/tech/1444216746/

【出題と回答例】
1 名前:デフォルトの名無しさん
  お題:お題本文

2 名前:デフォルトの名無しさん
  >>1 使用言語
  回答本文

【ソースコードが長くなったら】 (オンラインでコードを実行できる)
ideone.com/
codepad.org/
compileonline.com/
rextester.com/runcode
runnable.com/
code.hackerearth.com/
melpon.org/wandbox
https://paiza.io/

宿題は宿題スレがあるのでそちらへ。

185 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 01:20:45.82 ID:xslPbFLu.net]
>>180
ideone.com/UgHgtz
C++。多分間違ってる。数字も合わないしな。
i7-6700でリリースビルドで40秒くらいかかる。

見てる感じ塩基配列だよなこれ。

186 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 02:38:04.01 ID:/pg6QsRy.net]
>>180
c++ ideone.com/WK9LQi

問題文には明記なかったが、ユニークな52枚(4*13)1セットだけだとして解いた。

計算量は 1問 14^4*6 くらいになるのだろう。
(最初は14^5*6でやったが、ひとつ計算量落とした。
この数値じゃ、意味なかったけど)

187 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 06:35:41.46 ID:qDe/EUun.net]
動的計画法はよくわからん。
書けもしない。Orz

188 名前: ◆QZaw55cn4c mailto:sage [2017/04/14(金) 18:11:30.73 ID:UkhykSdt.net]
>>171 人気がないね…ループの知識だけあればOKでループの構成を考える腕力が多少あればそれなりに楽しめるお題と思ったんだけれども
新規性がないのが弱点なのかな?
次のお題を考えることにしようか

189 名前:デフォルトの名無しさん mailto:sage [2017/04/14(金) 22:18:00.95 ID:qDe/EUun.net]
ideone.com/Et54St
意味ないけど最適化したら現実的な時間で終わるようになった。
今暇なので、いい暇つぶしになったなぁ。意味ないけど。

190 名前:デフォルトの名無しさん [2017/04/15(土) 10:54:03.85 ID:tThpfxds.net]
>>186
>DAD2HAH3:4,2
>DAD3D8D9DJH5H8HKSASKCAC5C8CK:394,38
>SAS2S3S4S5S6S7S8S9C2C3C4C5C6C7C8C9CT:1972800,16

どういうこと???
組み合わせの数がカードの枚数すら超えてるの???

191 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 11:05:02.69 ID:eiwfOO/l.net]
そいつのコード見てないから分からんが多分、最初の例なら
1)DAHA
2)DAD2
3)HAH3
4)DAD2,HAH3
みたいにカウントされちゃってるんじゃないか?

192 名前:デフォルトの名無しさん [2017/04/15(土) 17:04:06.01 ID:gqnlgfq4.net]
>>180
最後のは9じゃなくて8組だろ

同じマーク S:4組、C:4組、合計8組
同じ数字 2,3,4,5,6,7,8,9の各ペアで合計8組
最大組数は8組

193 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 17:17:26.54 ID:gqnlgfq4.net]
>>180 C
ideone.com/vD1JHy



194 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 17:40:29.91 ID:gqnlgfq4.net]
俺も間違ってたので修正した
ideone.com/vD1JHy

答えは2組,6組,8組じゃないの?

195 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 19:29:06.55 ID:BbAH7YT3.net]
>>189
反例

数字で(S2=C2)で1ペア、
残り8枚ずつで同スートのペアを8つくる
合計 9ペア

数字で(S2=C2, S3=C3, S4=C4) 3ペア
残りは6枚ずつになるので、6ペアできる
合計9ペア

その他 数字のペアを奇数個つくれれば、9を作れる

196 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 20:24:00.89 ID:gqnlgfq4.net]
>>192
意味がわかった

197 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 21:12:03.91 ID:v99qvGb2.net]
8bitの整数を一つ引数として与え、
上位4bitと下位4bit を符号なし整数として掛け算した結果の8bitを返す関数を
論理演算子のみで実装したもののうち、
もっとも実行時間が短いものを挙げよ。
論理演算は全て1命令1サイクルとする。

198 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 21:23:09.15 ID:v99qvGb2.net]
表引きで1クロックとかは無しね。

199 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 22:10:36.10 ID:fG6QrlNX.net]
最も実行時間が短いかどうかの判定ってNP完全っぽそう

200 名前:デフォルトの名無しさん mailto:sage [2017/04/15(土) 23:11:44.46 ID:v99qvGb2.net]
8bitなら力技で解けないかな?

201 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 03:52:44.93 ID:T2fHNlZE.net]
ideone.com/QNbwWa
C++。えーん終わらないよ〜。
デバッグ覗いたら早い段階で答え出てるんだけど打ち切り方がわからない。

>>186などは題意を把握してなかった。

202 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 05:47:25.03 ID:T2fHNlZE.net]
ふえぇーん。1時間半回してもおわらないよー。
動的計画法すごい。

203 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 08:35:26.85 ID:0couv4LD.net]
>>180 Java
ideone.com/ABj7QB



204 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 14:11:29.20 ID:oOWZ5kyJ.net]
お題
これ
www.mext.go.jp/programin/
に相当するアプリケーションを
非Web環境でも使えるような仕様で
単一の言語でコーディングしろ

205 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 14:13:03.29 ID:aobdGNjh.net]
>>180 C
ideone.com/CH5bY4

206 名前:デフォルトの名無しさん mailto:sage [2017/04/16(日) 16:14:29.58 ID:z1TgtbB7.net]
>>201 Squeak Smalltalk で
https://scratch.mit.edu/scratch_1.4/

207 名前:デフォルトの名無しさん mailto:sage [2017/04/20(木) 11:21:43.08 ID:QJAwY2Mb.net]
>>201 Pharo Smalltalk のもあった
www.phratch.com/

208 名前:デフォルトの名無しさん mailto:sage [2017/04/22(土) 15:45:58.46 ID:Btp73K0S.net]
こういうのに瞬時に回答できるようになるまでどのくらいの時間がかかるものなの?

209 名前:デフォルトの名無しさん mailto:sage [2017/04/22(土) 21:31:15.12 ID:DL7Mzdas.net]
お題: くまモンをかく

210 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 10:45:10.81 ID:33igmMUW.net]
くまモン

211 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 20:01:13.92 ID:fsvPYIZO.net]
>>205
一瞬

212 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 20:24:02.53 ID:nc0/ghBL.net]
とんちかよw

213 名前:デフォルトの名無しさん mailto:sage [2017/04/23(日) 20:37:32.86 ID:7bZTt8wr.net]
ああ、やっと意味が分かったw



214 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 05:27:50.71 ID:+7Sa1g5s.net]
>>206
light.dotup.org/uploda/light.dotup.org437888.png
ideone.com/eJ2xul
C++。あー大変だった。
以前ラウム螺旋作った時の流用したけど、タートルグラフィックはGUI無いとキツイなぁ。
似てないとか苦情は受け付けません。あしからず。

215 名前:sage [2017/04/24(月) 05:36:47.92 ID:4BlFLqQl.net]
>>206 glsl
glslsandbox.com/e#40107.0

似てないなぁ……

>>211 GJ! 先越されたー

216 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 05:43:14.19 ID:+7Sa1g5s.net]
>>212
時代は3Dか・・・。
ロートルにはできん芸当だ。GJ。

217 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 11:57:42.03 ID:SbFm/aQk.net]
>>212
へーこんなところあるんだ知らんかった

218 名前:デフォルトの名無しさん [2017/04/24(月) 21:55:43.67 ID:WHcUZH3G.net]
すみません。何言ってるかわからないだろうけど、
12桁の数字が並ぶ羅列は何を表しているのでしょうか???
/021/000/000/000
とか

219 名前:デフォルトの名無しさん mailto:sage [2017/04/24(月) 22:16:03.57 ID:9NN+cmWY.net]
最初の3つが市外局番 次が区番号 残りが個人識別子だよ

220 名前:デフォルトの名無しさん mailto:sage [2017/04/25(火) 05:30:26.30 ID:8YHxJHtd.net]
12桁くらいの数字を使う規格ってそれなりにありそうだけどな。

221 名前:デフォルトの名無しさん mailto:sage [2017/04/25(火) 23:23:31.83 ID:bgy6YsrD.net]
お題:自然数nのヤング図形をもとめる

222 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 07:01:54.95 ID:ezAhxtxU.net]
>>218
ギブアップ。うぃきぺ見ても意味わかんない。頭爆発しそう。

223 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 07:24:25.57 ID:5DpYjYxD.net]
数字の入ったヤング盤じゃなくて、図形だけでいいの?
nのヤング図形を全部求めるってこと?



224 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 12:59:54.54 ID:BGeLfl3x.net]
>>218 Nim
https://wandbox.org/permlink/cNfdZ0908tcbQhod

225 名前:221 mailto:sage [2017/04/26(水) 16:03:33.34 ID:BGeLfl3x.net]
>>221は1行目が「× Yaund」「○ Young」という恥ずかしい間違いから始まり
N <= 0の時のチェック漏れやら
長方形のパターン(N=10の時の[5,5]や[2,2,2,2,2])が抜けてるなど
ミスしまくってました orz てことで、修正します

>>218 Nim
https://wandbox.org/permlink/RUf5B0SVg0MozD25

226 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 16:07:13.33 ID:ezAhxtxU.net]
なーんだそれでいいのか。
それならなんとか組めるかも。

227 名前:デフォルトの名無しさん mailto:sage [2017/04/26(水) 19:19:14.42 ID:ezAhxtxU.net]
>>218
ideone.com/6PRt5z
C++。こういうこと?やっぱりよくわからん。

228 名前:デフォルトの名無しさん mailto:sage [2017/04/27(木) 10:01:02.40 ID:LnKeLTZP.net]
問題の想定解と合ってるのかな?
出題者のコメントが欲しいところ

229 名前:デフォルトの名無しさん mailto:sage [2017/05/05(金) 08:45:57.67 ID:f8yfM1E5.net]
素人の言語処理100本ノック:まとめ
qiita.com/segavvy/items/fb50ba8097d59475f760

230 名前:デフォルトの名無しさん [2017/05/24(水) 21:48:00.75 ID:7oyfe1wq.net]
お題:以下を出力
857142
714285
571428
428571
285714
142857

231 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 22:07:09.20 ID:L9mU+g8W.net]
>>227
とりあえずPythonでやってみた
https://ideone.com/UCpMVm

232 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 22:19:15.30 ID:lEJcnLZT.net]
>>227
法則性がわからん
文字列じゃなくあくまで数値で?

233 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:21:53.31 ID:FC0+qCJl.net]
>>229
一番下の数字に1∼6を掛ければ



234 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:33:01.85 ID:0ssPtL9D.net]
>>227
C
ideone.com/eRLqLi

235 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:48:35.88 ID:99+UTRWu.net]
各々n/7の循環部だね

236 名前:デフォルトの名無しさん mailto:sage [2017/05/24(水) 23:51:10.59 ID:99+UTRWu.net]
>>227
Ruby
6.downto(1){|i|p i*1000000/7}

237 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 01:00:30.19 ID:vvyNjvHe.net]
>>227 Perl

use 5.016;
use integer;
say 857142 / $_ for 1..6;

238 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 01:16:57.10 ID:vvyNjvHe.net]
>>234 間違えてたスマソ
Perl

use 5.016;
say 142857 * (7 - $_) for 1..6;

$ perl 9_227.pl
857142
714285
571428
428571
285714
142857

239 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 13:01:14.56 ID:+8TeyhTL.net]
>>227 Squeak/Pharo Smalltalk

(142857 * (6 to: 1 by: -1)) asStringWithCr

=> '857142
714285
571428
428571
285714
142857'

240 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 13:21:29.71 ID:+8TeyhTL.net]
>>227 GNU Smalltalk

6 to: 1 by: -1 do: [:i | (142857 * i) displayNl]

ideone.com/yNgDeB

241 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 18:49:32.83 ID:F0MQej0l.net]
>>227 common lisp
(do ((i 6 (- i 1))) ((equal i 0)) (print (floor (/ (* 1000000 i) 7))))

242 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 19:28:46.12 ID:MmhezNib.net]
お題が情報不足過ぎて何を使っていいのか悪いのかがわかんない

243 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 21:35:24.87 ID:Z+pf95Ly.net]
>>227
@Mathematica

In[1]:=142857//
  IntegerDigits//
  NestList[RotateLeft,#,Length[#]-1]&//
  Map[FromDigits,#]&//
  Sort//
  Reverse//
  Map[{#}&,#]&//
  Grid

Out[1] = 857142
     714285
     571428
     428571
     285714
     142857



244 名前:デフォルトの名無しさん [2017/05/25(木) 21:56:10.72 ID:ShXkIc2G.net]
>>227 Io
a := 999999 / 7
for(i, 6 * a, a, -a, i println)

245 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 22:10:21.35 ID:73MQsPzv.net]
>>227 Nim
for i in countdown(6,1): stdout.writeline i*142857

246 名前:デフォルトの名無しさん mailto:sage [2017/05/25(木) 23:50:37.58 ID:SwCyV6dp.net]
>>227 ruby
puts (1..6).map {|i| i * 142857}.reverse

>>227 rust
fn main() {
//println!("{}", (1..7).rev().map(|i| (142857 * i).to_string()).collect::<Vec<_>>().join("\n"));
for i in (1..7).rev() {println!("{}", 142857 * i)}
}

247 名前:デフォルトの名無しさん [2017/05/27(土) 20:11:30.48 ID:x9+XjHY5.net]
227 R
write((6:1)*999999/7.",1)

248 名前:デフォルトの名無しさん mailto:sage [2017/05/28(日) 14:54:52.19 ID:/dM5Kslk.net]
>>227 SWI-Prolog
main(N, X) :- X1 is X * N, write(X1), nl, N > 1, N1 is N - 1, main(N1, X).
:- main(6, 142857).

249 名前:プログラミングのお題 [2017/06/01(木) 12:06:57.65 ID:o30QeXgp.net]
トランプ氏の謎の単語

covfefe

の謎を解明する。

250 名前:デフォルトの名無しさん [2017/06/01(木) 13:12:24.25 ID:/fo1vNun.net]

c,o,v,f,e,f,eの7文字をランダムに出力し続け、covfefeが完成するまでの文字数をカウント

251 名前:デフォルトの名無しさん mailto:sage [2017/06/01(木) 13:47:08.78 ID:sszEh+oH.net]
>>247 Squeak/Pharo Smalltalk

| count covfefe buffer |
count := 0.
covfefe := 'covfefe' asOrderedCollection.
buffer := covfefe copy atAllPut: $*.
[ count := count + 1.
 Transcript nextPut: (buffer removeFirst; add: covfefe atRandom).
 (count isDivisibleBy: 1000) ifTrue: [Transcript endEntry].
 buffer = covfefe
] whileFalse.
Transcript endEntry.
^count "= 3430

252 名前:1 " []
[ここ壊れてます]

253 名前:デフォルトの名無しさん mailto:sage [2017/06/01(木) 23:30:50.24 ID:MQJNOblg.net]
>>247 効率悪いけれど…
Perl

$w='covfefe';
@l=split '',$w;
do {
$_ .= $l[int(rand(7))];
} while (!/$w/);
print index $_, $w . "\n";



254 名前:デフォルトの名無しさん mailto:sage [2017/06/01(木) 23:44:01.17 ID:MQJNOblg.net]
>>249
ゴメン、これだと最初に見つかったときに0になっちゃうんで
「完成するまでの文字数」を出すためには
× print index $_, $w . "\n";

○ print index($_, $w) + 7 . "\n";
に修正させてください。

255 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 02:47:24.66 ID:znhUDH9D.net]
>>247 Nim

import random
const word = "covfefe"
var count, match = 0
randomize()
while match != word.len():
    let ch = word[random word.len()]
    stdout.write ch
    match = if ch == word[match]: match + 1 else: 0
    inc count
echo "\n", count

256 名前:デフォルトの名無しさん [2017/06/02(金) 07:41:45.64 ID:r1TSATN8.net]
それだとccovfefeのときとか抜け落ちるんじゃね?

257 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 14:13:15.27 ID:znhUDH9D.net]
>>252
その通りですね
お題のcovfefeなら安直な修正でいいかな

-    match = if ch == word[match]: match + 1 else: 0
+    match = if ch == word[match]: match + 1 elif ch == word[0]: 1 else: 0

258 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 20:36:39.00 ID:GZbUsfWf.net]
>>247 ruby
covf, buff = 'covfefe', ''
buff += covf.chars.sample until buff.end_with? covf
p buff.size

259 名前:片山博文MZ mailto:sage [2017/06/02(金) 21:34:10.62 ID:ECCI41T/.net]
お題: 2つの別々の牧場ウィンドウがあり、その中に複数の牛がうごめいている。複数の牛を選択して、別の牧場ウィンドウにドラッグ&ドロップできるようにしなさい。

260 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 21:43:02.00 ID:ZGhpg2JU.net]
GUIの課題ってコードも長くなりがちたから答えにくくない?

261 名前:片山博文MZ mailto:sage [2017/06/02(金) 21:46:38.91 ID:ECCI41T/.net]
賞金は早い者勝ちで三千円。スクリプト野郎どもにはできないだろう。へっ。

262 名前:片山博文MZ mailto:sage [2017/06/02(金) 22:03:27.70 ID:ECCI41T/.net]
>>256
githubがあるじゃないか。

263 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 22:03:48.67 ID:doJoDkLD.net]
賞金とか誰かと思ったら片山博文MZか。



264 名前:デフォルトの名無しさん mailto:sage [2017/06/02(金) 23:44:04.74 ID:cFhdiKGB.net]
三千円じゃ安い

265 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 01:24:32.19 ID:4TZnG99D.net]
>>255
動的言語のscriptでもQt,Wxwidget,Tkinterなど色々のGUI fwが使えるから書けるよ。
でも、エッセンスがなく、会コードが無駄に長くなるお題は、作成に時間がかかるし獣よな技術はないし
趣旨を考えで出題しろよ。
すくなくとも自分で作る気になれる題を出せ

266 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 01:26:10.05 ID:4TZnG99D.net]
>>261
会コードが無駄に長くなるお題は、作成に時間がかかるし獣よな技術はないし

解コードが無駄に長くなるお題は、作成に時間がかかるし技術はないし

267 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 01:50:43.99 ID:4TZnG99D.net]
でも、まぁ地獄の沙汰も金次第というじゃありませんか。
お見積もり30万円以上でしたらpython+tkinterで書いてお納めすtることも
検討させていただきますよ。ハイ
更にハイグレードに300万円だったらPerl+Ptkもお付けいたいます。
いかがですか?だんな
もみ手

268 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 19:38:09.78 ID:bt+/AaG5.net]
【問題】
アルバートとバーナードは、シェリルと友達になったばかりです。
シェリルの誕生日を2人は聞きましたが、彼女は10個の日にちを候補としてあげました。

・5月15日、5月16日、5月19日
・6月17日、6月18日
・7月14日、7月16日
・8月14日、8月15日、8月17日

それからシェリルは、アルバートに「月」だけを、バーナードに「日付」だけをそれぞれ教えました。
アルバート「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」
バーナード「僕はシェリルの誕生日を知らなかったけど、今は知ってるよ」
アルバート「それなら僕もいつだか知っているよ」
シェリルの誕生日はいつでしょうか?

プログラムを書いてプログラムに解かせること。

269 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 20:24:51.42 ID:LavjhbKR.net]
Console.WriteLine("知らんがな");

270 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 20:43:26.68 ID:GyX0IIiI.net]
(begin (display "知らんがな")(newline))

271 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 21:39:03.81 ID:3br47TQ3.net]
print("知らんがな")

272 名前:デフォルトの名無しさん mailto:sage [2017/06/03(土) 21:39:54.96 ID:+ZiDT+Cr.net]
世界で初めて原爆実験が行われた日を
わざわざ答えに選んだのは何か意図があってのこと?

273 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 02:59:00.78 ID:vYNPJugT.net]
2年前のログ見てみたけどそのときはここに持ちこむ奴いなかったんだな
Prologおじさんとかが嬉々としてやりそうだけど



274 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 03:31:57.97 ID:JSJPiIxT.net]
7月16日

275 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 11:23:47.25 ID:ICo3ogub.net]
>>264 f#
ideone.com/cBGHxs

276 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 12:17:11.76 ID:/fL6DBjJ.net]
>>264 Perl

@md = ([5, 15], [5, 16], [5, 19],
[6, 17], [6, 18],
[7, 14], [7, 16],
[8, 14], [8, 15], [8, 17]);
push @{$c{$$_[1]}}, $$_[0] for @md;
push @{$d{$$_[0]}}, $$_[1] for grep{1 < @{$c{$$_[1]}}} @md;
while (($m, $v) = each %d) {
print "$m/$$v[0]\n" if 1== @$v;
}

実行結果

$ perl 9_264.pl
6/17

277 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 12:22:24.53 ID:/fL6DBjJ.net]
>>272
7月16日が正解なら 解き方間を違えているのかも知れん

278 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 14:27:12.46 ID:ArM8onCc.net]
アルバート「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」
5,6月を排除

バーナード「僕はシェリルの誕生日を知らなかったけど、今は知ってるよ」
14日を排除

アルバート「それなら僕もいつだか知っているよ」
残り候補が一つの月 -> 7月16日

279 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 15:02:32.31 ID:/fL6DBjJ.net]
>>272 の解き方で考えたこと

アルバート「僕は(「月」だけしか教えてもらっていないので)シェリルの誕生日を知らないけど、
      (「日付」だけを教えてもらった)バーナードも知らないよ」
⇒「日付」だけ聞けば誕生日だと判明する、即ち日の登場回数が一回だけの月日、
 具体的には5月19日、6月18日は対象外とみなし除去

バーナード「僕は「日付」だけを教えてもらっても)シェリルの誕生日を知らなかったけど、
アルバートが「僕はシェリルの誕生日を知らないけど、バーナードも知らないよ」と言うのを聞いて
今は知ってるよ」
⇒日の登場回数が一回だけの19日、6月18日を除去したあと、
 登場回数が一回だけの日が バーナードの聞いた「日付」に当たり、
 誕生日だと考えられる。

⇒6/17

この考え方が違ったんだろうな…

280 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 15:42:35.42 ID:ArM8onCc.net]
>>275
アルバートは月を知ってるが、バーナードも知らない事を確信できるのは、
18,19日を含まない7,8月のどちらかという事になる -> 5,6月は全削除

それを聞いてバーナードは誕生日がわかるので、7,8月両方に含まれる14日ではなく、
15,16,17日のどれかになる

それを聞いてアルバートがわかるので、候補が一つしか残ってない7月16日という事になる

281 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:11:15.57 ID:Thsr1gL6.net]
6/17の方ぽいね

282 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:23:55.65 ID:8topuOK/.net]
5,6月は全排除でしょ

283 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:27:46.47 ID:/fL6DBjJ.net]
>>278
そこがオレにはよく理解できていなくてさ。
まぁ言葉にあいまいな面があるかもしれんから解釈に差が出たのかな



284 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:46:10.26 ID:3NGxsH/O.net]
>>279
解釈の差だけが問題じゃないだろ

> ⇒日の登場回数が一回だけの19日、6月18日を除去したあと、
>  登場回数が一回だけの日が バーナードの聞いた「日付」に当たり、
>  誕生日だと考えられる。

18日、19日は日の登場回数が一回だけであるということは
他の日は複数回登場するということだからその論理は破綻してる

285 名前:デフォルトの名無しさん mailto:sage [2017/06/04(日) 16:54:14.37 ID:/fL6DBjJ.net]
>>280
それは誤解というか解読不足。
5月19日、6月18日が除去されることによって、
元々複数回登場していた他の日のうち6月17日が単一の日となり
17日という日付さえ知らされれば、誕生日は6月17日と判明できる。






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<280KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef