RosettaCodeData/Task/Mutual-recursion/Kotlin/mutual-recursion.kotlin

28 lines
511 B
Text
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
// version 1.0.6
fun f(n: Int): Int =
when {
n == 0 -> 1
else -> n - m(f(n - 1))
}
fun m(n: Int): Int =
when {
n == 0 -> 0
else -> n - f(m(n - 1))
}
fun main(args: Array<String>) {
val n = 24
print("n :")
for (i in 0..n) print("%3d".format(i))
println()
println("-".repeat(78))
print("F :")
for (i in 0..24) print("%3d".format(f(i)))
println()
print("M :")
for (i in 0..24) print("%3d".format(m(i)))
println()
}