プログラミングのお題スレ Part22 (859ﾚｽ)
プログラミングのお題スレ Part22 http://mevius.5ch.net/test/read.cgi/tech/1691038333/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
16: デフォルトの名無しさん [sage] 2023/08/09(水) 12:27:32.68 ID:ZMLVZrF/ 無駄に比較回数が増えるsortを使っている>>13と>>14は不正解 単純にminが正解 http://mevius.5ch.net/test/read.cgi/tech/1691038333/16
36: デフォルトの名無しさん [sage] 2023/08/11(金) 17:41:01.68 ID:Nevl7mZs Haskell版で問題にされてるのは 遅延評価でO(n)となるhead $ sort部分ではなく O(nlog(n))のsortが別途あること http://mevius.5ch.net/test/read.cgi/tech/1691038333/36
157: デフォルトの名無しさん [] 2023/11/25(土) 22:17:37.68 ID:Al0Rw+0l >>156 R https://ideone.com/nTywN4 http://mevius.5ch.net/test/read.cgi/tech/1691038333/157
162: デフォルトの名無しさん [] 2023/11/26(日) 13:43:11.68 ID:4uIV+oN2 >>156 lisp https://ideone.com/pYi0rj http://mevius.5ch.net/test/read.cgi/tech/1691038333/162
188: 9 [sage] 2024/01/16(火) 02:37:52.68 ID:SfyAs2IF >>187 Perl5 use Time::Piece; use Time::Seconds; for (qw{00:00:00 23:59:59}) { $t = Time::Piece->strptime($_, '%T') + 1; print "入力:$_\n出力:", $t->strftime('%T'), "\n"; } ※見易くするためインデントを全角スペースに置換してあります 実行結果 ~ $ perl 22_187_1秒後.pl 入力:00:00:00 出力:00:00:01 入力:23:59:59 出力:00:00:00 http://mevius.5ch.net/test/read.cgi/tech/1691038333/188
567: デフォルトの名無しさん [sage] 2025/02/11(火) 17:43:14.68 ID:7RexIvi8 >>510 lisp https://ideone.com/qm4PsV http://mevius.5ch.net/test/read.cgi/tech/1691038333/567
584: デフォルトの名無しさん [age] 2025/02/12(水) 00:18:10.68 ID:hk2aQo3G 好きにしたら良いんやで吉田松陰もそんなこと言ってた気がする http://mevius.5ch.net/test/read.cgi/tech/1691038333/584
704: デフォルトの名無しさん [] 2025/03/25(火) 16:11:02.68 ID:Yc/egiP0 そこまでは興味ないや 「数倍」だったのはもしかして最適化オプション付けてなかったんじゃない?ってだけの話 http://mevius.5ch.net/test/read.cgi/tech/1691038333/704
715: デフォルトの名無しさん [] 2025/03/28(金) 22:28:49.68 ID:VDfNaTNz >>714 PowerShell $s = "D-L,U-X,U-Y,U-R,Z-B,B-E,B-M,B-N,V-H,V-X,W-F,W-R,R-B,R-W,O-W,O-S,F-A,Q-X,P-E,P-L,X-X,Y-M,Y-C,L-U,L-V,I-X,E-B,H-M,A-S" $h = @{} $s -split "," |% { $a, $b = $_ -split "-" $h[$a] += , $b } foreach ($a in $h.keys) { foreach ($b in $h[$a]) { if ($a -lt $b -and $h[$b] -contains $a) {"$a,$b"} } } -- 実行結果 -- B,E R,W http://mevius.5ch.net/test/read.cgi/tech/1691038333/715
718: デフォルトの名無しさん [sage] 2025/03/30(日) 01:28:45.68 ID:KrBJAiIU お題：1〜10までの範囲の乱数生成をn回行ったとき出た値の積が20の倍数になる確率Pnを出力せよ n=2 2, 10 ... 20 4, 5 ... 20 Pn=??? n=3 2, 5, 2 ... 20 4, 5, 2 ... 40 Pn=??? http://mevius.5ch.net/test/read.cgi/tech/1691038333/718
743: デフォルトの名無しさん [] 2025/04/09(水) 23:40:58.68 ID:Ip5PiQSs >>738-739, 742と>>741のC++を解の標準出力なしに変更したものの実行速度を比較したら、 前者の方が2000万以下では27%、20億以下では11%速かった。 http://mevius.5ch.net/test/read.cgi/tech/1691038333/743
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.034s