[過去ﾛｸﾞ] 高校数学の質問スレ Part437 (1002ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

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

---

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

---

660(1): 2024/08/04(日)14:47 ID:3N2oVMoX(1) AAS
>>653
直交座標で陰関数表示できているのでMonteCarlo法での近似は容易。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.

In[1]:= x1=y1=2^(2/3);

In[2]:= d=0.001;

In[3]:= pts=Partition[Flatten@Table[{x,y},{x,0,x1,d},{y,0,y1,d}],2];

In[4]:= xy=Select[pts,#[[1]]^3+#[[2]]^3 <= 3 #[[1]] #[[2]]&];

In[5]:= Mean[xy]

Out[5]= {0.806146, 0.806146}

Rでの数値積分での値と近似しているので正しい値なのだろう。

東大卒やエリート高校生による厳密解の算出を希望します。

---

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

---

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

---

ぬこの手 ぬこTOP 0.029s