find possible of elements in an array which can form a triangle.
let getTriangle (l:_ list) =
let len = l.Length
[
for i=0 to len-1 do
for j = i+1 to len-1 do
for k=j+1 to len-1 do
if l.[i] + l.[j] > l.[k] &&
l.[j] + l.[k] > l.[i] &&
l.[k] + l.[i] > l.[j] then yield l.[i], l.[j], l.[k] ]
getTriangle [10; 21; 22; 100; 101; 200; 300]
let len = l.Length
[
for i=0 to len-1 do
for j = i+1 to len-1 do
for k=j+1 to len-1 do
if l.[i] + l.[j] > l.[k] &&
l.[j] + l.[k] > l.[i] &&
l.[k] + l.[i] > l.[j] then yield l.[i], l.[j], l.[k] ]
getTriangle [10; 21; 22; 100; 101; 200; 300]
No comments:
Post a Comment