我想要写功能版本用于求出一对具有给定sum.the元素是命令性代码： object ArrayUtil{
def findPairs(arr:Array[Int],sum:Int) ={
val MAX = 50
val binmap:Array[Boolean] = new Array[Boolean](MAX)
for(i <- 0 until ar
我正在做一个相当简单的例子来学习如何使用ocaml作为命令式语言。 我的猜测是我搞砸了与分号，但我找不到代码 let sort array =
for index = 0 to (Array.length array -1) do
let boole = ref false;
let pos = ref index;
let max = ref array.(ind
这里我试图使用命令式样因式函数，但尽管函数的最后一行声明返回ref，fsc告诉我该函数正在返回一个单位。我知道mutables不允许被退回，但我认为你可以通过使用ref来规避这种情况？另外，请不要让我以功能性的方式重写它。我知道这是一种替代方案，但我正试图更好地理解语言中命令式编程的工作原理。 这里是我的程序： let factorial n = do
let res = ref 1
我的损失是完全为什么这个代码不类型的序列变异的成员变量： for p in prescrs do
p.ATC <- "A"
for c in p.Drug.Components do
for s in c.Substances do
s.DoseTotal.Adjust <- adjustKg
s.DoseTotal.Time <-