Re: [問題] mathematica可以做以下運算嗎?

看板Mathematica作者jurian0101 (Hysterisis)時間12年前 (2012/11/30 23:08)推噓0(0推 0噓 1→)

留言1則, 1人參與討論串4/5 (看更多)

※ 引述《abbybao (小寶)》之銘言： : 1.http://tinyurl.com/cqp98qj : 算極座標的面積 2*Integrate[JacobianDeterminant[Cylindrical[r, Theta, z]], {Theta, 0, Pi}, {r, 0, 4 - Cos[Theta]}] 33 Pi/2 : 2.http://tinyurl.com/cx9fuut : 算卡氏座標的弧長 Integrate[ ArcLengthFactor[{x, Log[1 - x^2], 0}, x, Cartesian], {x, 0, 1/4}] -1/4 + Log[5/3] : 3.http://tinyurl.com/cfrosjw : 算極座標的弧長 : 弧長部分我只有找到arclengthfactor這個指令,但是他範例只有參數座標的 : 直角跟極座標不知道怎麼寫? In coor= CoordinatesToCartesian[{1+Cos[Theta],Theta,0},Cylindrical] arclen= Simplify[ArcLengthFactor[coor,Theta,Cartesian]] A=2*Integrate[arclen,{Theta,0,Pi}] Out {Cos[Theta] (1+Cos[Theta]),(1+Cos[Theta]) Sin[Theta],0} Sqrt[2] Sqrt[1+Cos[Theta]] 8 : 4.http://tinyurl.com/c2mb8pd : 算旋轉體的體積 Integrate[Pi*(4/(4 + x^2))^2, {x, 0, 2}] : 5. 1/A = 1/9955 + 1/9956 + ...... + 1/9960 : 求 A 之值 ? (ANS:約1647) : 這題我用程式寫出來卻有兩個解 π 跟 1/π : 不知哪邊寫錯了? : http://ppt.cc/4P7B : 拜託大家了,謝謝^^ Solve裡面改成==，另外你的Σ八成有輸入錯誤，不然跑出Pi匪夷所思。檢查有沒有輸入錯誤就用 Hold[] 框起來，外面再用 InputForm[] 框起來按執行看有沒有正確轉成Sum[...]，變成其他東西就是輸入錯。不然就Exit[] 清空全部定義另外有需要用Solve的理由是啥 In Solve[Sum[1/x,{x,9955,9960}]==1/y,y] Out {{y->2707692558475112900120/1631549668968156161}} 或 In Sum[1/x,{x,9955,9960}] Out 2707692558475112900120/1631549668968156161 你該不會其實都會了，跑來給我們出習題吧 = = 那感謝你的習題，我長進了些許 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.112.213.88 ※ 編輯: jurian0101 來自: 140.112.213.88 (11/30 23:13)