[過去ﾛｸﾞ] 高校数学の質問スレ Part434 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
146: 2024/04/13(土)09:05 ID:OrZY0B6w(4/4) AAS
>>145
草 ＝ foreskinいじりでくさくなった Phimoseくんの常套句。
147(1): 2024/04/13(土)09:57 ID:A7e6sXLw(1) AAS
相変わらず日本語通じてないね尿瓶ジジイ
アンタみたいなチンパン笑わずにはいられないからw
148(1): 2024/04/13(土)10:09 ID:QNaR07Rc(1) AAS
◆当選確率1/10000000 の宝くじ
10枚を1日で購入するのと
1枚づつ10日に分けて購入するのとで
当選確率に差はありますか？
149: 2024/04/13(土)11:53 ID:THFrSUq1(1/2) AAS
>>139
三角形の形に依存するのでは？
150(1): 2024/04/13(土)12:08 ID:THFrSUq1(2/2) AAS
WolframのIntegerDigits関数をRに実装。
10進数 n をb進法表示の数列に変換する
IntegerDigits=\(n,b) n%/%b^(floor(log(n)/log(b)):0) %% b
IntegerDigits(2024,10)
IntegerDigits(2024,2)
IntegerDigits(2025,8)
151(2): 2024/04/13(土)20:09 ID:K9Qs0Ux5(1) AAS
>>150
関連問題
n!を2進法で表したときの桁数をm[n]とする。
例
5! = 120 = 1 1 1 1 0 0 0(2進法)なので7桁。
即ち m[5]=7
数列 m[1],m[2],...,m[2023],m[2024]
で先頭の数字として最も多く現れる数字は1〜9のいずれかを述べよ。
現れる頻度順に1〜9の数字を並べよ。
あらゆるリソースを用いてよい。
152(2): 2024/04/14(日)01:43 ID:qwERWQHx(1/2) AAS
>>151
スレチかもしれないけど最小限の環境(小型マイコン)で計算してみた
言語はC
$ cat fact.c
#include<stdio.h>
#include<math.h>
int main() {
long N,n,i[10]={0,0,0,0,0,0,0,0,0,0};
double lfac=0,mn;
scanf("%ld",&N);
省30
153(2): 2024/04/14(日)03:54 ID:T4z17oY+(1/22) AAS
>>152
>>152
力作のレスありがとうございます。
Wolfram言語での結果
m=Table[Length[IntegerDigits[n!,2]],{n,2024}]
b=Table[First[IntegerDigits[a]],{a,m}]
Table[Count[b,c],{c,1,9}]
In[3]:= Table[Count[b,c],{c,1,9}]
Out[3]= {1030, 140, 131, 128, 124, 120, 119, 117, 115}
と合致しました。
省1
154: 2024/04/14(日)04:14 ID:T4z17oY+(2/22) AAS
順位はみてのとおり
In[9]:= d=Table[Count[b,c],{c,1,9}]
Out[9]= {1030, 140, 131, 128, 124, 120, 119, 117, 115}
In[10]:= d
Out[10]= {1030, 140, 131, 128, 124, 120, 119, 117, 115}
In[11]:= Ordering[d]
省1
155: 2024/04/14(日)05:15 ID:T4z17oY+(3/22) AAS
飲酒や喫煙は高校生には禁じられているが、プログラムは禁じられていない。
LGBTが叫ばれる昨今では不純異性交際は微妙ｗ
朝飯前の問題
素数を小さい順に100万個集める。
先頭の数字として現れる数字を頻度の多い順に並べなさい。
あらゆるリソースを用いてよい。
156: 2024/04/14(日)05:37 ID:T4z17oY+(4/22) AAS
Rでの算出
> tbl
1 2 3 4 5 6 7 8 9
415441 77025 75290 74114 72951 72257 71564 71038 70320
> order(tbl,decreasing = TRUE)
[1] 1 2 3 4 5 6 7 8 9
Wolframscriptでの算出
In[30]:= a=Table[Count[Table[First[IntegerDigits[n]], {n, Prime[Range[10^6]]}],m],{m,9}]
Out[30]= {415441, 77025, 75290, 74114, 72951, 72257, 71564, 71038, 70320}
In[31]:= Reverse[Table[Range[9][[i]],{i,Ordering[a]}]]
省3
157(1): 2024/04/14(日)06:26 ID:KAPnCPO9(1) AAS
>>151-153
明らかにスレチだし明らかに自演だよね
158: 2024/04/14(日)07:10 ID:T4z17oY+(5/22) AAS
>>157
自演だったら俺がC言語の達人ということになるのだが、
受験板ではないので問題の意味が高校数学の範囲で理解できれば許容される。
小学校の算数や図形の問題を方程式や三角関数を使って解いても構わない。
159: 2024/04/14(日)07:29 ID:1U/RnNK4(1/7) AAS
小学生の算数に方程式や三角関数でドヤられても恥ずかしい大人なだけじゃん
散々スルーされても分からないんだね、だから自演なんかやるんだ
しかも自分のこと達人とか言って笑
160(1): 2024/04/14(日)08:18 ID:T4z17oY+(6/22) AAS
>>147
草 多用する理由は図星。
Q.E.D.
161(1): 2024/04/14(日)08:38 ID:1U/RnNK4(2/7) AAS
>>160
一回使っただけで多様？アホなん？w
162(1): 2024/04/14(日)09:25 ID:qwERWQHx(2/2) AAS
152は151,153とは別人で、単に大きな階乗の計算は対数とれば簡単に計算できることを示したかっただけです。
スレを荒らしてしまったようですまない。
163(3): 2024/04/14(日)09:43 ID:T4z17oY+(7/22) AAS
宝くじまとめ買いの問題
宝くじ1万枚が1枚2500円で売り出され、うち20枚が当たりである。
当たれば1枚につき賞金100万円がもらえる。
一度に10枚買って当たりが1枚でもあればそこで終了。
1枚も当たらなければ残りの9990枚から10枚を買う。
それでも当たらなければ残りの9980枚から10枚を買う。
以下同様に、少なくとも1枚の当たりがでるまで買い続ける。
(1) 獲得賞金−購入総額の期待値と中央値を求めよ。
(2) 1枚いくらであれば期待値が０になるか求めよ。
あらゆるリソースを用いてよい。
省26
164(1): 2024/04/14(日)09:53 ID:T4z17oY+(8/22) AAS
AA省
165(1): 2024/04/14(日)09:57 ID:T4z17oY+(9/22) AAS
>>162
Cだと浮動小数点数をつかうから
floor(lfac/log(2)+1+1e-12)とかの工夫が必要になってきますよね。
Rも同様なので大きな数字を扱うときは丸め誤差がでてきます。
上下前次1-新書関写板覧索設栞歴
あと 837 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.024s