[過去ログ]
高校数学の質問スレ(医者・東大卒専用) Part438 (1002レス)
高校数学の質問スレ(医者・東大卒専用) Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
360: 132人目の素数さん [sage] 2024/12/01(日) 13:24:19.50 ID:URtmhVxU ナルシシスト数(ナルシシストすう、英: narcissistic number)とは、n 桁の自然数であって、その各桁の数の n 乗の和が、元の自然数に等しくなるような数をいう。 例えば、1^3 + 5^3 + 3^3 = 153 であるから、153 はナルシシスト数である。 .... 十進法に限らず、他の基数においても同様にナルシシスト数を定義できる 問題 16進法で4桁までのナルシスト数は何個あるか? すべて列挙せよ。 {1, 2, 3, 4, 5, 6, 7, 8, 9, a, b, c, d, e, f, 156, 173, 208, 248, 285, 4a5, 5b0, 5b1, > 60b, 64b, 8c0, 8c1, 99a, aa9, ac3, ca8, e69, ea0, ea1, b8d2} hex[x_]:= ResourceFunction["HexConvert"][x] NaruQ[s_]:=( d=hex /@ StringSplit[s,""]; le=Length[d]; hex@Total[d^le] == s ) solve[start_:"1",end_:"fff"]:=( h=hex /@ Range[hex[start],hex[end]]; Select[h,NaruQ] ) solve["10000","fffff"] {13579, 2b702, 2b722, 5a07c, 5a47c, c00e0, c00e1, c04e0, c04e1, c60e7, c64e7, c80e0, > c80e1, c84e0, c84e1, de030, de031, de430, de431, eb7c2, fb06a, fb46a, fc276} http://rio2016.5ch.net/test/read.cgi/math/1723152147/360
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 642 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.013s