循环：while...do 表达式
while...do 表达式用于在指定的测试条件为 true 时执行迭代操作（循环）。
语法
while test-expression do
body-expression
备注
计算测试表达式；如果为 true，则执行主体表达式，并再次计算测试表达式。 主体表达式必须具有类型 unit。 如果测试表达式为 false，则迭代结束。
以下示例阐释了 while...do 表达式的用法。
open System
let lookForValue value maxValue =
let mutable continueLooping = true
let randomNumberGenerator = new Random()
while continueLooping do
// Generate a random number between 1 and maxValue.
let rand = randomNumberGenerator.Next(maxValue)
printf "%d " rand
if rand = value then
printfn "\nFound a %d!" value
continueLooping <- false
lookForValue 10 20
上述代码的输出是介于 1 到 20 之间的随机数的流，其中最后一个值为 10。
13 19 8 18 16 2 10
Found a 10!
