作者fumizuki (小獅子)
看板Visual_Basic
標題Re: [VB6 ] 判斷為何種三角形
時間Thu Jun 23 11:08:59 2005
※ 引述《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
1F:推 soonsoondog:較小兩邊平方和與最大邊平方相比 218.165.75.5 06/23
2F:推 fumizuki:喔喔 61.222.155.162 06/23
3F:推 fumizuki:那就不能用 And 啦@@ 61.222.155.162 06/23
4F:推 neplayer:他問的應該是數學, 不是程式XD140.120.134.239 06/23
5F:推 fumizuki:這邊寫的規則就跟首篇寫的不一樣了@@" 210.58.156.43 06/24
6F:推 johnnydepp:先排序就只需兩個規則,應該會快些?140.119.143.186 06/25