Advertisement
Guest User

Untitled

a guest
Feb 9th, 2012
685
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
F# 0.31 KB | None | 0 0
  1. let rec loop(start, last) =
  2.     let mid = (start + last) / 2
  3.     printfn "Is your number %d (H - Too High/L - Too Low/=)?" mid
  4.     let answer = System.Console.ReadLine()
  5.     match answer with
  6.     | "H" -> loop(start, mid)
  7.     | "L" -> loop(mid+1, last)
  8.     | "=" -> printfn "Your number is %d!" mid
  9.  
  10. loop(0, 100)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement