如何在F#中的函数中使用用户输入的值?

时间:2016-09-10 19:49:03

标签: f# user-input factorial

所以我试图在F#中创建一个简单的阶乘函数,它使用从用户输入的值(使用控制台,我不知道这是否有任何区别)但我似乎无法找到任何解决方案能够在我的函数中使用用户的值。

    open System

    let rec fact x =
        if x < 1 then 1
        else x * fact (x - 1)

    let input = Console.ReadLine()
    Console.WriteLine(fact input)

它经常给我错误说“这个表达式应该有类型”int“但这里有类型”string“”。如果有人知道如何使其正常工作(或者至少可以告诉我我需要做什么来将我的用户输入的值转换为INT,那将非常感激。

感谢您的帮助。

3 个答案:

答案 0 :(得分:3)

F#没有为您自动转换,因此您需要解析字符串:

open System

let rec fact x =
    if x < 1 then 1
    else x * fact (x - 1)

let input = Console.ReadLine()
Console.WriteLine(fact (Int32.Parse input))

理论上你需要转换回字符串来打印它,但是它有效,因为Console.WriteLine有一个过载,它接受一个整数并进行转换。

答案 1 :(得分:0)

既有:

somevalue |> int

System.Int32.Parse somevalue

在无效输入上抛出异常是不是更好地阻止你的应用程序在运行时爆炸?

由于我找不到任何返回int option的函数,我写了一个:

let asInt32 numberString =
  let (success,num)  = 
    System.Int32.TryParse(numberString)
  if success then
    Some num
  else
    None
asInt32 "22"

(使用TryParse作为Gustavo建议的)

答案 2 :(得分:0)

我的建议是尝试使用F#函数,除非没有等效的F#函数。

第二,F#中的类型转换函数已嵌入var result = await authenticationContext.AcquireTokenAsync(graphResourceId, clientId, new UserPasswordCredential(userName, password)); 。 “ System.(type).(Try)Parse”是可选的,Try是任何数字类型,例如type,...,int8int64和浮点数。 (最后一个是64位)

因此float32是正确的。这两个功能是等效的。这也适用于浮点数。

第三,如果可以的话,请尝试使用尾部递归:

int "123" = System.Int32.Parse("123")

如果我们键入let fact n = let rec help acc = function | n when n <= 0 -> acc | n -> help (acc*n) (n-1) help 1 n let input = System.Console.ReadLine() printfn "fact %s = %d" input (fact (int input)) ,然后按Enter,则输出为:

4

我不知道F#中是否有与fact 4 = 24 等价的东西。我找不到任何东西。

尝试坚持F#风格而不在C#和F#之间跳转的原因是,其他读者和您自己可能会感到困惑,因为这可能会使代码的可读性降低。