[過去ﾛｸﾞ] プログラミングのお題スレ Part21 (1002ﾚｽ)

プログラミングのお題スレ Part21 http://mevius.5ch.net/test/read.cgi/tech/1668333636/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

767: デフォルトの名無しさん [] 2023/06/12(月) 23:18:28.27 ID:Qrbs+YQO PowerShell 7は前のバージョンよりは速くなっていて、以下のプログラムは>>761の 3分の1ほどの時間で実行できた。 $n = 1234567 $isprime = @($false) * 2 + @($true) * ($n - 1) foreach ($i in 2..[Math]::sqrt($n)) { 　　if ($isprime[$i]) {for ($j = $i + $i; $j -le $n; $j += $i) {$isprime[$j] = $false}} } $j = 0 $p = $q = @(0) * ($n + 1) foreach ($i in 2..$n) { 　　if ($isprime[$i]) {$p[$j++] = $i} 　　$q[$i] = $j - 1 } $k = 0 foreach ($i in 0..$q[$n / 3]) { 　　$m = $n - $p[$i] 　　foreach ($j in $i..$q[$m / 2]) { 　　　　if ($isprime[$m - $p[$j]]) {$k++} 　　} } "${k}通り" http://mevius.5ch.net/test/read.cgi/tech/1668333636/767

769: 638 [sage] 2023/06/12(月) 23:47:34.40 ID:zjICvCkc >>766 おお、指摘ありがとう。 俺てっきりa < b < cを検索する問題だと思い込んでた。何故合わないか頭ひねっていた。 思い込みにより作りこんだバグというものはなかなか自力で問題だと気づけないんだよな…。 >>767 俺も時間あったら高速化してみるよ。そのうち…、時間があったら… 第二loopの高速化は他にも試作したけどちょっとムｽﾞカしい http://mevius.5ch.net/test/read.cgi/tech/1668333636/769

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.044s