高校数学の質問スレ（医者・東大卒専用） Part438 (752ﾚｽ)
上下前次1-新
46: 2024/08/15(木)12:49 ID:6mj/BVQi(1) AAS
>>45
高校生にまたバカにされたいのか？
47: 2024/08/15(木)17:41 ID:bFfiJSUV(1/3) AAS
janken simulator
j[n_] :=(
count=0;
Until[Length@Union@a==2,a=RandomChoice[Range[3],n];count++];
b=Sort@Union@a;
If[b=={1,2}, c=Count[a,2]];
If[b=={2,3}, c=Count[a,3]];
If[b=={1,3}, c=Count[a,1]] ;
{c,count}
)
省1
48(1): 2024/08/15(木)17:59 ID:bFfiJSUV(2/3) AAS
n=9;
j[n_] :=(
count=0;
Until[Length@Union@a==2,a=RandomChoice[Range[3],n];count++];
b=Sort@Union@a;
If[b=={1,2}, w=Count[a,2]];
If[b=={2,3}, w=Count[a,3]];
If[b=={1,3}, w=Count[a,1]] ;
{w,count}
)
省2
49(1): 2024/08/15(木)18:27 ID:bFfiJSUV(3/3) AAS
小学生向きの問題
王様 と 王様でない人とはどちらが多いでしょうか?
50: 2024/08/15(木)19:21 ID:k34L4Drp(1/3) AAS
>>49
chatGPTに聞かないと答えが分からないアホ発見
51: 2024/08/15(木)19:23 ID:ysyyeRB1(1/2) AAS
j[n_] :=( (* n人でジャンケンして勝者が決まるまでの回数と勝者の数*)
count=0;
Until[Length@Union@a==2,a=RandomChoice[Range[3],n];count++];
b=Sort@Union@a;
If[b=={1,2}, winners=Count[a,2]];
If[b=={2,3}, winners=Count[a,3]];
If[b=={1,3}, winners=Count[a,1]] ;
{winners,count}
)
sim[n_] :=((* 勝者が一人になるまでの回数 *)
省7
52: 2024/08/15(木)19:23 ID:ysyyeRB1(2/2) AAS
Rに移植
j=\(n){
a=sample(3,n,replace=TRUE)
count=1
while(length(unique(a))!=2){
a=sample(3,n,replace=TRUE)
count=count+1
}
b=sort(unique(a))
if(all(b==c(1,2))) winner=2
省18
53(2): 2024/08/15(木)19:29 ID:s7yxKa8y(1) AAS
Wolfram
画像ﾘﾝｸ[png]:i.imgur.com
R
画像ﾘﾝｸ[png]:i.imgur.com
同じアルゴリズムなので同様の結果になった。
54(1): 2024/08/15(木)19:56 ID:k34L4Drp(2/3) AAS
>>53
なんで日本語不自由なのに数学できると思ってんだチンパンは
55(2): 2024/08/15(木)20:59 ID:k34L4Drp(3/3) AAS
>>53
結局無理数の証明はダンマリ？
56(2): 2024/08/16(金)13:42 ID:BuIOB4cE(1/2) AAS
>>55
ググれば答がでてくるようなのは放置。
んで、ググってもでてこない、3Dグラフの動画はまだぁ？
57: 2024/08/16(金)13:44 ID:BuIOB4cE(2/2) AAS
ハノイの塔のソルバー Wolfram版
hanoi[n_,from_:"A",via_:"B",to_:"C"] :=(
If[n>=1,hanoi[n-1,from,to,via];Print["move ",n, " from ",from, " to ",to];hanoi[n-1,via,from,to]]
)
hanoi[6]
58: 2024/08/16(金)14:02 ID:jFisYWC2(1) AAS
>>56
なんかwolframで答えみたいなの出してたけどw
結局高校数学の基礎すら分からんってことね
59(1): 2024/08/16(金)14:05 ID:D3c2lioP(1/2) AAS
>>56
24：卵の名無しさん：2024/08/16(金) 08:48:49.90 ID:eXoor/xc
>>20
50歳男性
食事の際に胸がつかえる感じがする
下の内視鏡所見
↓
画像ﾘﾝｸ[jpeg]:i.imgur.com
診断と治療は？内視鏡専門にしてるなら答えれるよなwww
無視したり答えられなかったらお前は底辺シリツ医以下の知能しか無いってことでwww
省1
60: 2024/08/16(金)14:25 ID:D3c2lioP(2/2) AAS
スレタイ以外のことでいくら発狂したところで無視されるのは当たり前だろマヌケ
無理数の>>31すら答えられないのかよ？
61(1): 2024/08/16(金)15:15 ID:ahhsBV/s(1/2) AAS
尿瓶ジジイID:BuIOB4cEにはできない問題を質問します
①√2は無理数であることを証明せよ。
②1+2+…+2024は何桁の整数か。
62: 2024/08/16(金)15:31 ID:bNupVHmJ(1) AAS
（1）リウヴィルの定理
p, q が自然数のとき
｜√2 − p/q｜ ≧ (6-4√2)/qq,
∴ √2 ≠ p/q (無理数)
63: 2024/08/16(金)15:49 ID:ahhsBV/s(2/2) AAS
当然ながら同じIDじゃないと認めません
64: 2024/08/16(金)16:58 ID:3S2KNH0L(1/4) AAS
本スレでは散々発狂してますが>>61に対してこっちでは一切ダンマリを決め込んでる模様
65: 2024/08/16(金)17:29 ID:NAPgnpHZ(1/2) AAS
問題 油分け算のソルバーを作れ。（言語は問わない）
R言語でのソルバー
画像ﾘﾝｸ[png]:i.imgur.com
これをWolframに移植する気にならんなぁ。
Wolframでないと分数での厳密解が出せないというわけでもないから。
黒瀬のスパイスをつかってチキンジャーキーを作る方が楽しい。
焼き肉のタレでつくったら嫁から評判が悪かったので作り直し。
上下前次1-新書関写板覧索設栞歴
あと 687 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 1.276s*