Advertisement
ingwey

gbs

Apr 16th, 2013
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.30 KB | None | 0 0
  1. median :: Int -> Int -> Int -> Int
  2.  
  3. median x y z = if (((x >= y) && (x <= z)) || ((x <= y) && (x >= z)))
  4. then x
  5. else if (((y >= x) && (y <= z)) || ((y <= x) && (y >= z)))
  6. then y
  7. else if (((z >= x) && (z <= y)) || ((z <= x) && (z >= y)))
  8. then z
  9.  
  10. {- main = print median 25 11 33 -}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement