高校数学の質問スレ(医者・東大卒専用) Part438 (991レス)
高校数学の質問スレ(医者・東大卒専用) Part438 http://rio2016.5ch.net/test/read.cgi/math/1723152147/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
470: 132人目の素数さん [sage] 2024/12/28(土) 09:03:58.56 ID:pTaNTUpL 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 http://rio2016.5ch.net/test/read.cgi/math/1723152147/470
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.589s*