看板 [ Mathematica ]
討論串[問題] 求最小整數解
共 2 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#1
[問題] 求最小整數解
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者sweetycool (tina)時間10年前 (2014/06/01 22:48), 編輯資訊
1
0
1
內容預覽:
已知 a,b,c,d皆為正整數. a+b=c+d. 1/13 = ac/bd. 令s=a+b+c+d. 求min s ?. ans: 170. 想問一下這題有辦法跑出來嗎?感恩. --. ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.231.104.17. ※ 文章網址: http:/
#2
Re: [問題] 求最小整數解
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者LPH66 (1597463007)時間10年前 (2014/06/04 02:58), 編輯資訊
0
0
1
內容預覽:
嗯，雖然數學版已經有人回說答案不對了，不過還是來跑一下. 順便介紹幾個函式. 首先是本題 (合併成一行之後的) 程式. Catch[. Do[. If[Length[#] != 0, Throw[Append[#, n]]] &[. Position[Outer[Times, #, #], 1/13
(還有2666個字)
首頁
上一頁
1
下一頁
尾頁