[過去ﾛｸﾞ] 底辺私立医大を卒業した医者って頭悪いよね？ Part30 (1002ﾚｽ)
上下前次1-新

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

831: (ﾜｯﾁｮｲ 7f58-nRHk [14.13.16.0 [上級国民]]) 2024/05/24(金) 06:21:36.06 ID:tvMs1ymz0(2/2) AAS
全長１ｍの真っ直ぐな棒を無作為に切断して４つに分ける。
この４つの棒切れを４辺とする四角形を面積が面積が最大になるように配置して面積を計算する
(例：25cmの棒切が４個の場合、正方形に配置して面積計算する）
当然、四角形ができない場合もある。
(1) 四角形ができる確率を求めよ。
(2）四角形ができない場合（例：5cm 10cm,15cm 70cmに切断された場合）は面積は0として計算して
面積の平均値を求めよ。
(3) 四角形ができない場合は除外して面積０以上の四角形の面積の平均値を求めよ。

(* Sqrt[(s-a)(s-b)(s-c)(s-d)- a b c d Cos[(A+C)/2]^2 ] *)
f1[] :=(
a=RandomReal[{0,1}];
b=RandomReal[{0,1-a}];
c=RandomReal[{0,1-a-b}];
d=1-a-b-c;
{a,b,c,d}=Sort[{a,b,c,d}];
s=(a+b+c+d)/2;
If[s>d,Sqrt[(s-a)(s-b)(s-c)(s-d)],0]
)
s1=Table[f1[],1*^6];
Mean[s1]
Mean@Table[Boole[x>0],{x,s1}] // N
Histogram[s1]

---

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

---

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

---

ぬこの手 ぬこTOP 0.006s