高校数学の質問スレ(医者・東大卒専用) Part438 (979レス)
高校数学の質問スレ(医者・東大卒専用) Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
347: 132人目の素数さん [sage] 2024/11/30(土) 16:16:40.90 ID:BMBeqwqc (* 疑似ヴァンパイア数(Pseudovampire numbers)は、「数字を2等分」という縛りを無くした数である。 例えば126 = 6×21など。 https://ja.wikipedia.org/wiki/ヴァンパイア数 問題 3桁の疑似ヴァンパイア数を列挙せよ。 *) f[n_]:=( p=Permutations[IntegerDigits[n],{3}]; prd=(10 #[[1]]+#[[2]])#[[3]]& /@ p; ContainsAny[prd,{n}] ) n=Select[Range[100,999],f] g[x_]:=( p=Permutations[IntegerDigits[x],{3}]; prd=(10 #[[1]]+#[[2]])#[[3]]& /@ p; i=Position[prd,x][[1]][[1]]; {10p[[i]][[1]]+p[[i]][[2]],p[[i]][[3]]} ) g /@ n http://rio2016.5ch.net/test/read.cgi/math/1723152147/347
352: 132人目の素数さん [sage] 2024/11/30(土) 20:02:31.66 ID:BMBeqwqc >>351 1日15件くらいやってますが? 昔は20件を超えることもあったな。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/352
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.815s*