問題的階乘函數

Question

我一直在試圖編寫一個程序，打印出一個階乘，但實際上沒有使用遞歸。

下面是代碼

let factorial x = 
    let mutable n = x 
     while n > 0 do 
      let result = n*(n-1) 
      n <- (n-1) 
     result 

的問題是，當我嘗試運行它告訴我，該預期的結果是一個單位的代碼，而輸入顯然是一個整數，這顯然導致一個錯誤。不過，我已經檢查了我的所有變量和編譯器會將它們解釋爲整數，所以有什麼問題

Answer 1

沒有與您的代碼在這裏的幾個問題，你必須牢記壓痕 F＃中是非常重要的，因爲你想要做你的代碼應該是：

let factorial x = 
    let mutable n = x 
    let mutable result = 1 
    while n > 0 do 
     result <- n * (n-1) 
     n <- (n - 1) 
    result 

你被宣佈while範圍內result變量並返回它外面。但是你的代碼是不正確的，我花了修改，在這裏我就是這樣做的自由：

let factorial x = 
    let mutable n = x 
    let mutable result = 1 
    while n >= 1 do 
     result <- result * n 
     n <- (n - 1) 
    result