[過去ﾛｸﾞ] 高校数学の質問スレ Part438 (1002ﾚｽ)
上下前次1-新

---

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

---

762: 11/30(土)06:26 ID:L4mkprla(3/6) AAS
>>760
(2)　解答例
KaprekarQ[li_] :=(
max=DigitsInteger@ReverseSort@li;
min=DigitsInteger@Sort@li;
d=max-min;
lid=IntegerDigits@d;
(d == DigitsInteger@ReverseSort@lid - DigitsInteger@Sort@lid) && max!=min
)
k=Union@Flatten@Table[(10^6-10^0)x+(10^5-10^1)y+(10^4-10^2)z,{x,0,9},{y,0,9},{z,0,9}];
AnyTrue[IntegerDigits /@ k,KaprekarQ]

---

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

---

あと 240 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.007s