3
let impfac i =
let l = ref i in
let result = ref 1 in
let k = ref 2 in
while !k < !l do
result := !result * !k
k:=!k+1
done;
!result
エラーメッセージは次のとおりです。ocamlの階乗関数のこの必須のバージョンで何が問題になっていますか?
let impfac i =
let l = ref i in
let result = ref 1 in
let k = ref 2 in
while !k < !l do
result := !result * !k
k:=!k+1
done;
!result;;
Characters 121-123:
result := !result * !k
^^
Error: This expression is not a function; it cannot be applied
#
完璧!問題が解決しました!!!ご協力いただきありがとうございます!!!私はインデントのヒントが大好き! – lkahtz