[過去ログ] 高校数学の質問スレ(医者・東大卒専用) Part438 (1002レス)
上下前次1-新
抽出解除 必死チェッカー(本家) (べ) 自ID レス栞 あぼーん
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
リロード規制です。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 
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.046s