Re: [VB6 ] 判斷為何種三角形

看板Visual_Basic作者 (小獅子)時間19年前 (2005/06/23 11:02), 編輯推噓6(600)
留言6則, 4人參與, 最新討論串6/6 (看更多)
※ 引述《clifflu ( 雪寶也要變強喔)》之銘言: : ※ 引述《fumizuki (小獅子)》之銘言: : : 我數學都忘光了 O_Q : : 給個規則來吧,應該只是簡單幾行不會有問題吧 @_@? : 三角型三邊長 a,b,c, : 假設 a >= b >= c : 若 a^2 < b^2 + c^2, 則其為銳角三角型 : a^2 > b^2 + c^2 則為鈍角三角型 : 當數值使用 float / double 時, 請注意數值上會有的問題. : 大約是這樣. 這不是 c 沒有 float 型態,應該是 single / double 是任意兩邊的平方和 與 第三邊的平方和 做比較嗎? If (a ^ 2 < b ^ 2 + c ^ 2) And (b ^ 2 < a ^ 2 + c ^ 2) And _ (c ^ 2 < a ^ 2 + b ^ 2) Then MsgBox "銳角三角型" 浮點數的話 最好用 double 型態 如果是平方和相等呢? -- VB 程式設計 倉木麻衣 PTT 星爺板 行列輸入法 ====================================================== Visual_Basic MaiKuraki Stephen Array -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.222.155.162

218.165.75.5 06/23, , 1F
較小兩邊平方和與最大邊平方相比
218.165.75.5 06/23, 1F

61.222.155.162 06/23, , 2F
喔喔
61.222.155.162 06/23, 2F

61.222.155.162 06/23, , 3F
那就不能用 And 啦@@
61.222.155.162 06/23, 3F

140.120.134.239 06/23, , 4F
他問的應該是數學, 不是程式XD
140.120.134.239 06/23, 4F

210.58.156.43 06/24, , 5F
這邊寫的規則就跟首篇寫的不一樣了@@"
210.58.156.43 06/24, 5F

140.119.143.186 06/25, , 6F
先排序就只需兩個規則,應該會快些?
140.119.143.186 06/25, 6F
文章代碼(AID): #12kYOqBy (Visual_Basic)
文章代碼(AID): #12kYOqBy (Visual_Basic)