高校数学の質問スレ（医者・東大卒専用） Part438 (991ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡
13(1): １３２人目の素数さん [sage] 2024/08/11(日)16:40:58.98 ID:y6yg1Hhb(3/6)
ComplexExpand[(1 + I)^(1 - I)]
Log[1+I] // ComplexExpand
71: １３２人目の素数さん [sage] 2024/08/17(土)13:19:41.98 ID:dkCzRgHk(2/4)
>>66ここのスレではダンマリ決め込んでるみたい
ようやく自分が医者でも東大卒でもないことがわかったの？
102: １３２人目の素数さん [sage] 2024/08/20(火)05:30:38.98 ID:O+DDQLmu(1/4)
"
n=11;
pn={jan[n,1]};
Total@Flatten@Table[jan[n,x1]jan[x1,1],{x1,2,n}]//AppendTo[pn,#]&;
Total@Flatten@Table[jan[n,x1]jan[x1,x2]jan[x2,1],{x1,2,n},{x2,2,x1}]//AppendTo[pn,#]&;
Total@Flatten@Table[jan[n,x1]jan[x1,x2]jan[x2,x3]jan[x3,1],{x1,2,n},{x2,2,x1},{x3,2,x2}]//AppendTo[pn,#]&;
Total@Flatten@Table[jan[n,x1]jan[x1,x2]jan[x2,x3]jan[x3,x4]jan[x4,1],{x1,2,n},{x2,2,x1},{x3,2,x2},{x4,2,x3}]//AppendTo[pn,#]&;
"
str=NULL
str[1]="pn={jan[n,1]};"
str[2]="Total@Flatten@Table[jan[n,x1]jan[x1,1],{x1,2,n}]//AppendTo[pn,#]&;"
str[3]="Total@Flatten@Table[jan[n,x1]jan[x1,x2]jan[x2,1],{x1,2,n},{x2,2,x1}]//AppendTo[pn,#]&;"
str[4]="Total@Flatten@Table[jan[n,x1]jan[x1,x2]jan[x2,x3]jan[x3,1],{x1,2,n},{x2,2,x1},{x3,2,x2}]//AppendTo[pn,#]&;"
str[5]="Total@Flatten@Table[jan[n,x1]jan[x1,x2]jan[x2,x3]jan[x3,x4]jan[x4,1],{x1,2,n},{x2,2,x1},{x3,2,x2},{x4,2,x3}]//AppendTo[pn,#]&;"
for(i in 2:30){
y=paste0(",x",i,"]jan[x",i,",1],")
tmp=sub(",1],",y,str[i])
z=paste0("},{x",i,",2,x",i-1,"}]")
str[i+1]=sub("}]",z,tmp)
}
378: １３２人目の素数さん [sage] 2024/12/05(木)20:02:08.98 ID:Kxn4SMrl(1)
>>377
内視鏡洗浄に１時間かかるわけがない。
379: １３２人目の素数さん [sage] 2024/12/05(木)20:34:49.98 ID:ynBzGGEQ(2/2)
見逃したくさんありそうだし不潔だねww
429: １３２人目の素数さん [sage] 2024/12/19(木)20:13:14.98 ID:LCH85f+S(1/3)
(*
８本の注射液があり、赤,青,黄,緑,白,黒,紫,茶のラベルが貼られている。
いずれも十分な量があり、そのうち１本が致死的な毒薬であることがわかっている。
３匹のネズミに注射液を混合して注射してどれが毒薬かを特定したい。
複数の注射液を混合しても毒性は変わらないとする。
各々のネズミに注射できるのは１回だけである。
赤 青 黄 黒 の混合液
赤 白 黒 茶 の混合液
青 緑 白 黒 の混合液
を３匹に１つずつ注射すれば特定できる。
ネズミを区別しないとして、このような組み合わせは何通りあるか。
*)
s4=Subsets[Range[8],{4}];
grp=Subsets[s4,{3}];
Short[grp]
rat=Subsets[Range[3],3]
f[x_]:=(
z1=Length@Complement[Range[8],Flatten@x];
z28=Table[
dead = Intersection@@x[[rat[[i]]]];
alive= Flatten@x[[Complement[Range[3],rat[[i]]]]];
Length@Complement[dead,alive],{i,2,8}];
AllTrue[Flatten@{z1,z28},#==1&]
)
ans=Select[grp,f];
Length[ans]
Short[ans]
472: １３２人目の素数さん [sage] 2024/12/28(土)12:26:13.98 ID:ABHDoLY/(1/3)
横綱、大関、関脇で巴戦を行う。
２力士が対戦して，勝った方が残りの 1 力士と対戦をする。
これを繰り返して，２連勝した力士が優勝をする。
勝利確率は通算成績に従うとする（巴戦での成績も組み入れて計算する）
巴戦前の通算成績は
横綱 対 大関は 横綱の１０勝９負
大関 対 関脇は 大関の ８勝７負
横綱 対 関脇は 横綱の ６勝５負
とする。
大関 対 関脇で巴戦を始めるときにそれぞれの力士の優勝する確率を算出しなさい。
620: １３２人目の素数さん [sage] 01/24(金)08:13:24.98 ID:g6kVd1oy(1/4)
数学の知識が乏しくプログラムも稚拙なことを自覚しているから恥ずかしくて専門スレに書けない。それでも病的に自己顕示欲が強いので関係ないスレなのに書かずにいられない。。
旧二期校卒の医師と言う設定もその現れだろう。
678(1): １３２人目の素数さん [sage] 02/06(木)16:36:22.98 ID:Kqo8KOCs(1/6)
>>672
nodocaを器具と言うのも同程度じゃないか？
687(2): １３２人目の素数さん [sage] 02/06(木)17:17:38.98 ID:Kqo8KOCs(5/6)
>>685
それで判断できると本気で思ってるの？
789(1): １３２人目の素数さん [sage] 04/11(金)08:48:09.98 ID:XbILkG4Y(1)
https://i.imgur.com/K4MsqXt.jpeg
797: １３２人目の素数さん [sage] 04/27(日)11:41:50.98 ID:sC6S4NLE(1)
ダランベールの判定法とコーシーの判別法で求めたべき級数の収束半径は一致しますか？一致するならその証明方法の概略を教えてください。
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.058s