高校数学の質問スレ（医者・東大卒専用） Part438 (752ﾚｽ)

高校数学の質問スレ（医者・東大卒専用） Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

40: １３２人目の素数さん [sage] 2024/08/15(木) 00:23:28.29 ID:zglV+U2W (続き) 　S_0 = 1 + 1 + 1 = 3, 　S_1 = a + b + c = 1, 　S_2 = aa + bb + cc = 3, 　S_3 = 4 + 3t(tt-t-1), 漸化式 　S_n = S_{n-2} + S_{n-2} + (1/3) (S_3 - 4) S_{n-3}, そこで 　S_n = 1　となる奇数n 　S_n = 3　となる偶数n をさがす。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/40

41: １３２人目の素数さん [sage] 2024/08/15(木) 00:30:52.81 ID:zglV+U2W a + b + c = 1, aa + bb + cc = 3, a^17 + b^17 + c^17 = 1, を解け。 実数解は (a,b,c) = (-1,1,1)　(1,-1,1)　(1,1,-1) http://rio2016.5ch.net/test/read.cgi/math/1723152147/41

42: １３２人目の素数さん [sage] 2024/08/15(木) 00:41:32.86 ID:zglV+U2W ↑ 虚数解 　t^3 − t^2 − t + 3 = 0, 　t = [−(35+3√129)^{1/3} − (35-3√129)^{1/3} + 1]/3 　　= −1.359304086 　[(1-t) ±ｉ√(-t-1)･√(5-3t)]/2 = 1.179652043 ± 0.903013146ｉ 　S_3 = -5, 　abc = -3, http://rio2016.5ch.net/test/read.cgi/math/1723152147/42

43: １３２人目の素数さん [sage] 2024/08/15(木) 01:32:00.94 ID:zglV+U2W >>38-40 　t^3 − t^2 − t + (4 - S_3)/3 = 0, より 　t = (−[q+√(qq−64)]^{1/3} −[q-√(qq−64)]^{1/3} + 1) /3, 　ここに q = (25−9･S_3)/2, http://rio2016.5ch.net/test/read.cgi/math/1723152147/43

44: １３２人目の素数さん [sage] 2024/08/15(木) 10:18:26.54 ID:5ggTekS4 bWin <- function(x){# 1 beats 3, 3 beats 2, 2 beats 1 if(length(unique(x))!=2 ) return(0) # no winner u=sort(unique(x)) if(all(u==c(1,2))) return(sum(x==2)) # how many winners who won by 2 if(all(u==c(2,3))) return(sum(x==3)) # how many winners who won by 3 if(all(u==c(1,3))) return(sum(x==1)) # how many winners who won by 1 } janken.till.winner.sim <- function(n){ # janken till someone wins if(n<2) return(NA) x=sample(1:3,n,replace = TRUE) # janken by n people count=1 # counter of janken game while(bWin(x)==0){ # if draw try again x=sample(1:3,n,replace = TRUE) # janken again till someone win count=count+1 } c(bWin(x),count) # return how many winners and counter } janken.till.chamipion.sim <- \(n){ re=janken.till.winner.sim(n) count=re[2] winner=re[1] while(winner>1){ re=janken.till.winner.sim(n) count=count+re[2] winner=re[1] } count } res=replicate(1e5,janken.till.chamipion.sim(9)) summary(res) hist(res,col=2,breaks='scott',freq=FALSE,xlab='count',main='') BEST::plotPost(res,showMode = TRUE,breaks='scott') http://rio2016.5ch.net/test/read.cgi/math/1723152147/44

45: １３２人目の素数さん [sage] 2024/08/15(木) 10:18:53.46 ID:5ggTekS4 ９人で野球チームをつくる。 全員がピッチャーをやりたがったためジャンケンで決めることにする。 全員でのジャンケンから始めてその勝者でジャンケンを続けることを繰り返す。 ピッチャーが決まるまでのジャンケンの回数の期待値と中央値を求めよ。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/45

46: １３２人目の素数さん [sage] 2024/08/15(木) 12:49:28.59 ID:6mj/BVQi >>45 高校生にまたバカにされたいのか？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/46

47: １３２人目の素数さん [sage] 2024/08/15(木) 17:41:15.12 ID:bFfiJSUV 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} ) j[4] http://rio2016.5ch.net/test/read.cgi/math/1723152147/47

48: １３２人目の素数さん [sage] 2024/08/15(木) 17:59:59.43 ID:bFfiJSUV 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} ) For[{w,count}=j[n],w>1,k=j[w];w=k[[1]];count=count+k[[2]]] {w,count} http://rio2016.5ch.net/test/read.cgi/math/1723152147/48

49: １３２人目の素数さん [sage] 2024/08/15(木) 18:27:20.71 ID:bFfiJSUV 小学生向きの問題 王様　と　王様でない人とはどちらが多いでしょうか? http://rio2016.5ch.net/test/read.cgi/math/1723152147/49

50: １３２人目の素数さん [sage] 2024/08/15(木) 19:21:07.03 ID:k34L4Drp >>49 chatGPTに聞かないと答えが分からないアホ発見 http://rio2016.5ch.net/test/read.cgi/math/1723152147/50

51: １３２人目の素数さん [sage] 2024/08/15(木) 19:23:19.21 ID:ysyyeRB1 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_] :=((* 勝者が一人になるまでの回数　*) For[{winner,counts}=j[n],winner>1,k=j[winner];winner=k[[1]];counts=counts+k[[2]]]; counts ) res9=Table[sim[9],10^5]; Histogram[res9] Mean[res9]//N Median[res9] http://rio2016.5ch.net/test/read.cgi/math/1723152147/51

52: １３２人目の素数さん [sage] 2024/08/15(木) 19:23:48.55 ID:ysyyeRB1 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 if(all(b==c(2,3))) winner=3 if(all(b==c(1,3))) winner=1 winners=sum(a==winner) c(winners,count) } sim=\(n){ c=j(n) winner=c[1] count=c[2] while(winner>1){ k=j(winner) winner=k[1] count=count+k[2] } count } res9=replicate(1e5,sim(9)) BEST::plotPost(res9,breaks='scott') http://rio2016.5ch.net/test/read.cgi/math/1723152147/52

53: １３２人目の素数さん [sage] 2024/08/15(木) 19:29:14.64 ID:s7yxKa8y Wolfram https://i.imgur.com/iiZxHO7.png R https://i.imgur.com/T6TIE9M.png 同じアルゴリズムなので同様の結果になった。 http://rio2016.5ch.net/test/read.cgi/math/1723152147/53

54: １３２人目の素数さん [sage] 2024/08/15(木) 19:56:17.63 ID:k34L4Drp >>53 なんで日本語不自由なのに数学できると思ってんだチンパンは http://rio2016.5ch.net/test/read.cgi/math/1723152147/54

55: １３２人目の素数さん [sage] 2024/08/15(木) 20:59:51.79 ID:k34L4Drp >>53 結局無理数の証明はダンマリ？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/55

56: １３２人目の素数さん [sage] 2024/08/16(金) 13:42:56.09 ID:BuIOB4cE >>55 ググれば答がでてくるようなのは放置。 んで、ググってもでてこない、3Dグラフの動画はまだぁ？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/56

57: １３２人目の素数さん [sage] 2024/08/16(金) 13:44:09.89 ID:BuIOB4cE ハノイの塔のソルバー　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] http://rio2016.5ch.net/test/read.cgi/math/1723152147/57

58: １３２人目の素数さん [sage] 2024/08/16(金) 14:02:36.89 ID:jFisYWC2 >>56 なんかwolframで答えみたいなの出してたけどw 結局高校数学の基礎すら分からんってことね http://rio2016.5ch.net/test/read.cgi/math/1723152147/58

59: １３２人目の素数さん [sage] 2024/08/16(金) 14:05:08.96 ID:D3c2lioP >>56 24：卵の名無しさん：2024/08/16(金) 08:48:49.90 ID:eXoor/xc >>20 50歳男性 食事の際に胸がつかえる感じがする 下の内視鏡所見 ↓ https://i.imgur.com/qcEfQIC.jpeg 診断と治療は？内視鏡専門にしてるなら答えれるよなwww 無視したり答えられなかったらお前は底辺シリツ医以下の知能しか無いってことでwww これの答えまだ？ http://rio2016.5ch.net/test/read.cgi/math/1723152147/59

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.006s