F# 用于多项式的文本表示

在F#中，可以使用自定义数据类型来表示多项式。以下是一个示例代码：

type Polynomial = float list

let polynomialToString (p: Polynomial) : string =
    let terms =
        p
        |> List.rev
        |> List.mapi (fun i coeff -> sprintf "%f*x^%d" coeff i)
    String.concat " + " terms

let p1 = [3.0; -2.5; 0.0; 1.0] // 多项式 3x^3 - 2.5x^2 + x
let p2 = [-1.0; 2.0; 0.5] // 多项式 -x^2 + 2x + 0.5

printfn "%s" (polynomialToString p1)
printfn "%s" (polynomialToString p2)

在上面的代码中，我们定义了一个Polynomial类型，它是一个由浮点数列表表示的多项式。polynomialToString函数将多项式转换为字符串表示形式。它通过反转多项式列表，然后使用List.mapi函数将每个系数和指数转换为字符串，并使用String.concat函数将它们连接起来。

然后，我们创建了两个多项式p1和p2，并使用polynomialToString函数将它们转换为字符串表示形式并打印出来。

执行上述代码将输出以下结果：

1.000000*x^3 + -2.500000*x^2 + 3.000000*x^0
0.500000*x^2 + 2.000000*x^1 + -1.000000*x^0

这样，我们就可以使用F#来表示和打印多项式的文本表示了。