高校数学の質問スレ（医者・東大卒専用） Part438 (883ﾚｽ)

高校数学の質問スレ（医者・東大卒専用） Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

830: １３２人目の素数さん [sage] 2025/05/09(金) 06:19:21.94 ID:vIVXuysf SequentialPrimeDigits[n_Integer] := Module[{p = 10, result = {}}, While[Length[result] < n, If[PrimeQ[p] && AllDifferencesAreOneQ[p], AppendTo[result, p] ]; p++ ]; result ] AllDifferencesAreOneQ[num_Integer] := Differences[IntegerDigits[num]] === ConstantArray[1, Length[IntegerDigits[num]] - 1] SequentialPrimeDigits[5] {23, 67, 89, 4567, 23456789} SequentialPrimeDigits[20] http://rio2016.5ch.net/test/read.cgi/math/1723152147/830

---

ﾒﾓ帳

(0/65535文字)

---

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

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.033s