高校数学の質問スレ（医者・東大卒専用） Part438 (991ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

470(1): 2024/12/28(土)09:03 ID:pTaNTUpL(1) AAS
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.

In[1]:= 4 * Integrate[Sqrt[r^2-x^2]-r/2,{x,r/2,r*Sqrt[3]/2}]

2
r (-3 (-1 + Sqrt[3]) r + Pi Sqrt[r ])
Out[1]= -------------------------------------
3

In[2]:= r=6

Out[2]= 6

In[3]:= f[p_,o_] := Total[(p-o)^2] <= r^2

In[4]:= f4[p_] :=(
AllTrue[{f[p,{0,0}],f[p,{r,0}],f[p,{r,r}],f[p,{0,r}]},#==True&]
)

In[5]:= ratio=f4 /@ Tuples[Range[0,r,0.001],2] // Boole // Mean;

In[6]:= r^2 * ratio // N

Out[6]= 11.3415

In[7]:=
11.3415

---

471: 2024/12/28(土)10:20 ID:byAnFSyo(1/2) AAS
>>470

137：卵の名無しさん：[sage]：2024/12/27(金) 16:30:06.83 ID:UPA/6UxQ
レス乞食じゃなきゃ然るべきスレでやるもんね

---

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

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

ぬこの手 ぬこTOP 0.032s